VB外掛ZedGraphControl
Dim countchartx As Integer '定義在最前面 DataGridView1.DataSource = set1.Tables("1a") ' 要先把資料庫資料放入資料表!!! '在程式中 Dim month(DataGridView1.Rows.Count - 1) As String '定義一個資料表筆數的矩陣 For Me.countchartx = 1 To DataGridView1.Rows.Count - 1 month(Me.countchartx - 1) = Format(CDate(DataGridView1.Rows(Me.countchartx - 1).Cells(1).Value), "hh:mm:ss") '把所有資料表的時間存入矩陣中 Next ZedGraphControl1.GraphPane.XAxis.Type = AxisType.Text ZedGraphControl1.GraphPane.XAxis.Scale.TextLabels = month '然後就會放在X軸囉
文章標籤
全站熱搜
留言列表
生活 (12)