请问，如何设置MSchart的横轴的间距？

Question

我的代码如下：
Private Sub Command1_click()
Dim db As New ADODB.Connection
Dim rs As New ADODB.Recordset
Set db = New ADODB.Connection
Set rs = New ADODB.Recordset
db.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Ramon\桌面\tlq.mdb;Persist Security Info=False"
db.Open
rs.Open "select * from tao", db, adOpenKeyset, adLockOptimistic
'Set MSChart1.DataSource = rs    rs.MoveLast
    rs.MoveFirst    If rs.RecordCount = 0 Then
            MsgBox "请在数据库中输入数据!", vbCritical
        Exit Sub
      End If
    With MSChart1
            .TitleText = "直方图示例"
            .RowCount = rs.RecordCount
            For i = 1 To rs.RecordCount
                  .Row = i                  .RowLabel = rs.Fields("年份")
                  rs.MoveNext
            Next i
    End With    rs.Close
End Sub
代码生成的默认间距是1，我想把它改成2或3的间距，不知道怎么实现，请各位指点迷津！谢谢。

Answer 1

With MSChartTrend      .ChartData = arrData
      .Plot.Axis(VtChAxisIdX).CategoryScale.DivisionsPerLabel = lngRecordCounts / cXLables
      .Plot.Axis(VtChAxisIdX).CategoryScale.LabelTick = True
      .Plot.Axis(VtChAxisIdX).CategoryScale.DivisionsPerTick = lngRecordCounts / cXTicks End With

Answer 2

lngRecordCounts 
cXLables
cXTicks都指的是干什么东西呢?

Answer 3

偶同样关注ING，这个问题搁下很久了没有解决，很想加上去，它自己加的太多，而且仅仅是序号不是间距数值