Option Explicit
Private Sub Command1_Click()
Dim i As Integer, j As Integer
Me.TChart1.Series(0).Clear
Me.TChart1.Series(1).Clear
    For i = 2 To 20 Step 2
        j = i ^ 2 + 5
        Me.TChart1.Series(0).Add j, i, clTeeColor
    Next
    For i = 3 To 21 Step 2
        j = i ^ 2 + 5
        Me.TChart1.Series(1).Add j, i, clTeeColor
    Next
End SubPrivate Sub Form_Load()
TeeCommander1.Chart = TChart1
End Sub
代码如上所示,
我想要问如何控制tchart的坐标X使得坐标的值为代码中的I值
可是实际情况如下图:X轴却是012345678序列请问如何控制