本人使用DotNetBar算起来有三四年了,到现在使用的9.0版本,感觉比以前的版本稳定多了,在开发软件使用DotNetBar可以使用界面美观,专业,下面就使用MicroChart1作一历史记录,供大家参考
'加载到图像
Private Sub LoadChart(ByVal pstr As String)
If pstr = "" Then Exit Sub
MicroChart1.DataPoints = GetTareDataPoints(pstr)
MicroChart1.Update()
End Sub
'获得皮重值
Private Function GetTareDataPoints(ByVal pStr As String) As List(Of Double)
Dim points As New List(Of Double)()
Dim tmp As String = " 车船号='" & pStr & "'"
Dim Dt As New DataTable
Dt = Bl.GetNameBydate(" 皮重 ", tmp, DTPbegin.Value, DTPEnd.Value).Tables(0)
For Each m As DataRow In Dt.Rows
points.Add(Double.Parse(m("皮重").ToString))
Next
Return points
End Function
1、grouppanel.text 如果付空置,会导致系统出错提示》