1,216
社区成员
发帖
与我相关
我的任务
分享
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Dim i As Integer
Text1.Text = ""
For i = 0 To DataGrid1.Columns.Count - 1
Text1 = Text1 & DataGrid1.Columns(i) & " "
Next
End Sub