vchart 坐标轴标题_如何修改MSchart控件里横坐标标签与纵坐标标题问题

该楼层疑似违规已被系统折叠 隐藏此楼查看此楼

‘===================以下是上面图片代码==================’

Dim arrPrices(0 To 19, 0 To 5)

Dim i As Integer

Dim p As Integer

Private Sub Command1_Click()

End

End Sub

Private Sub Command2_Click()

Static a As Integer

a = a + 1

Command2.Caption = IIf(a = 1, "¿ªÊ¼", "Í£Ö¹")

If a = 1 Then

Command2.Caption = "¿ªÊ¼"

Timer1.Interval = 0

Else

Command2.Caption = "Í£Ö¹"

a = 0

Timer1.Interval = 200

End If

End Sub

Private Sub Command3_Click()

For j = 1 To MSChart1.ColumnCount ' PV?CH1~CH6 ?7???

MSChart1.Column = j '?MSChart2?????Column1?

Select Case j

Case 1:

temp = "PV"

Case 2:

temp = "CH1_Temp"

Case 3:

temp = "CH2_Temp"

Case 4:

temp = "CH3_Temp"

End Select

Next j

End Sub<