如何在 vb.net 图表 Y 轴中显示数据库中的总行数
How to display overall count of rows in a database in vb.net CHART Y AXIS
Edit i tried the RecCount from Hel o Ween's comment and it showed this exception RecCount
这是我的代码,x 轴工作正常但 y 轴显示此错误:Exception of Y axis
Im trying to make the x axis with all the same value in a specific column.
And y axis as the overall counts of rows in a database
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
感谢 Hel O'Ween 的评论和此线程:"You tried to execute a query that does not include the specified aggregate function" 现在已修复。我只是在 FROM 语句之后调整并添加了 GROUP BY。
Heres the result chart
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
Edit i tried the RecCount from Hel o Ween's comment and it showed this exception RecCount
这是我的代码,x 轴工作正常但 y 轴显示此错误:Exception of Y axis
Im trying to make the x axis with all the same value in a specific column. And y axis as the overall counts of rows in a database
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
感谢 Hel O'Ween 的评论和此线程:"You tried to execute a query that does not include the specified aggregate function" 现在已修复。我只是在 FROM 语句之后调整并添加了 GROUP BY。
Heres the result chart
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