64,646
社区成员
发帖
与我相关
我的任务
分享
for(short int i = 1;i<=MSChart1->RowCount();i++)
MSChart1->RowLabel(i,1,siToBSTR(i));//函数siToBSTR完成short int转换为对应BSTR功能,需要你自己实现
Private Sub Command1_Click()
Dim i As Long
For i = 1 To MSChart1.RowCount
MSChart1.Row = i
MSChart1.RowLabel = CStr(i)
Next
End Sub