关于mschart的问题？

Question

'xxx 为数据    With MSChart1
        .chartType = VtChChartType2dPie
        .ColumnCount = 2
        .RowCount = 1
        Dim XXX As Double
        XXX = Val(MSHFlexGrid1.TextMatrix(MSHFlexGrid1.Row, 2))
        .TitleText = "饼图示例 完成百分比"
        .Column = 1
        .Row = 1
        .Data = XXX
        .ColumnLabel = "完成百分比" & Str(XXX) & "%"
        .Column = 2
        .Row = 1
        .Data = 100 - XXX
        .ColumnLabel = "剩余百分比" & Str(100 - XXX) & "%"
     End With