这是我在vb.net中绘制图形的函数我将如何用从数据库中搜索的值替换(“Jon”,10),(“Jordan”,8)?
Private Sub chart_btn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles chart_btn.Click
Chart1.Series("Student").Points.AddXY("Jon", 10)
Chart1.Series("Student").Points.AddXY("Jordan", 8)
Chart1.Series("Student").ChartType = System.Windows.Forms.DataVisualization.Charting.SeriesChartType.Bar
End Sub
答案 0 :(得分:1)
Entity Framework
将是一个很好的方法。 EF
返回表示表的类对象。然后,您创建query
并可以应用filters
并获得IEnumerable(Of {record})
,然后您可以迭代此List
并提供记录中的参数。函数更适合解析字段并根据给定字符串返回值。 EF
简化了获取数据并将其置于类/属性格式,以便您可以在代码中使用它。 Documentation Tutorial
示例:
For Each rec As Record In dbModel.Records.Where(Function(o) o.clientId = clientId).ToList
Chart1.Series("Student").Points.AddXY(rec.Name, GetYValue(rec.Amount))
Next
Private Function GetYValue(value As string) As Integer
Dim result As Integer = 0
Select Case value
Case "r"
result = 0
Case "b"
result = 1
Case Else
result = 2
End Select
Return result
End Function