VB Datagrid控件

来源:百度知道 编辑:UC知道 时间:2024/05/05 19:46:07
请问在Datagrid中 选中点击 的一行资料
请给出代码 谢谢

Private Sub Command1_Click()
'判断是否选择了表中的一行
If Adodc1.Recordset.EOF = True Or Adodc1.Recordset.BOF = True Then
MsgBox "请选择要显示的行"
Exit Sub
End If

'读取选中的行数据,显示数据
Text1.Text1 = Adodc1.Recordset.Fields(0)
Text2.Text2 = Adodc1.Recordset.Fields(1)
Text3.Text3 = Adodc1.Recordset.Fields(2)
Text4.Text4 = Adodc1.Recordset.Fields(3)
Text5.Text5 = Adodc1.Recordset.Fields(4)

End Sub

选中点击的一行是通过Recordset来记录的,因此只需要将Recordset的各个字段值赋给你相应的控件就行了!