快速将DataGrid控件中的数据显示在文本框中,可以使用DataGrid控件的Columns集合中的Text属性。具体实现代码如下:
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Text11.Text = DataGrid1.Columns(0).Text
End Sub
如果使用TextBox控件数组,则代码如下:
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
For i = 0 To 7
Text1(i).Text = DataGrid1.Columns(i).Text
Next I
End Sub