編輯我嘗試了 Hel o Ween 評論中的 RecCount，它顯示了這個例外RecCount
這是我的代碼，x 軸正在作業，但 y 軸顯示此錯誤：Y 軸例外
我試圖在特定列中使用所有相同的值制作 x 軸。y 軸作為資料庫中的總行數
Dim READER As OleDbDataReader
Try
Dim query As String
query = "SELECT ID, purok FROM Household"
cmd = New OleDbCommand(query, con)
READER = cmd.ExecuteReader
Dim dT As New DataTable
dT.Load(READER)
Dim counter As String
counter = dT.Rows.Count.ToString
'Dim countrow = Convert.ToInt16(cmd.ExecuteScalar)
'Label3.Text = countrow
Chart1.Series("Purok").XValueMember = "Purok"
Chart1.Series("Purok").YValueMembers = counter
Chart1.DataSource = dT
Chart1.DataBind()
con.Close()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
uj5u.com熱心網友回復：
感謝 Hel O'Ween 的評論和此執行緒：“您試圖執行不包含指定聚合函式的查詢”，現在已修復。我只是在 FROM 陳述句之后調整并添加了 GROUP BY。
這是結果圖
Dim READER As OleDbDataReader
Try
Dim query As String
query = "SELECT purok, COUNT(*) As RecCount FROM Household GROUP BY purok"
cmd = New OleDbCommand(query, con)
READER = cmd.ExecuteReader
Dim dT As New DataTable
dT.Load(READER)
Chart1.Series("Purok").XValueMember = "purok"
Chart1.Series("Purok").YValueMembers = "RecCount"
Chart1.DataSource = dT
Chart1.DataBind()
con.Close()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/346033.html
下一篇：在svg中創建內部陰影