为什么我的MSChart显示少一列，up有分

Question

mschart不能用绑订,它会把你的第一各数据用来当作caption(还是其他什么的),要手动赋值!看下面的代码
    Adostat.RecordSource = "select ...."
    Adostat.Refresh
    MSChart.ColumnCount = Adostat.Recordset.RecordCount
    i = 1
    Do While Not Adostat.Recordset.EOF
       MSChart.Column = i
       MSChart.Data = CCur(Adostat.Recordset(1))
       MSChart.ColumnLabel = ....
        i = i + 1
        Adostat.Recordset.MoveNext
    Loop

Answer 1

就是columnlabel属性三,Data决定一个柱子的高度(数值),columnlabel决定该柱子下面显示的东西(字符串),可以再看看msdn

Answer 2

我再描述一下：我现在想同时显示出一个月中的计划值和实际值，然后在每一个月下面的label里显示月份，最好也能在每一个柱子上面显示相应的值。能不能给一些例子，如果分数不够，可以再加！！

Answer 3

Adostat.RecordSource = "select ...."
    Adostat.Refresh
    MSChart.ColumnCount = Adostat.Recordset.RecordCount   'ColumnCount决定一共有多少列柱子
    i = 1  '柱子1
    Do While Not Adostat.Recordset.EOF
       MSChart.Column = i '开始给第i列柱子赋值
       MSChart.Data = CCur(Adostat.Recordset(1))  'Data决定柱子的高度,数值
       MSChart.ColumnLabel = "柱子" & i    'Columnlabel就是柱子下面显示的内容
        i = i + 1 '开始写下一列柱子
        Adostat.Recordset.MoveNext 
    Loop