本例子下载地址:http://download.csdn.net/source/334323
使用步骤:
1、注册控件ReportX.ocx(本压缩包内不包含ReportX.ocx,如果需要请到http://download.csdn.net/source/275430下载)
代码:
Private Sub AppendCol_Click()
ReportX1.AppendCol 1
End Sub
Private Sub AppendRow_Click()
ReportX1.AppendRow 1
End Sub
Private Sub Copy_Click()
Dim SelectMinx As Long
Dim SelectMiny As Long
Dim SelectMaxx As Long
Dim SelectMaxy As Long
ReportX1.GetSelectCell SelectMinx, SelectMiny, SelectMaxx, SelectMaxy
ReportX1.CopyCell SelectMinx, SelectMiny, SelectMaxx, SelectMaxy
End Sub
Private Sub Cut_Click