在datagrid的单击事件上添加文本框名称.text=ado控件名称.recordset("字段名称")这样就可以完成你的要求说明一下原因,因为当datagrid进行单击选择的时候,当前记录就会移动到你单击的数据行处,所以直接用文本框的text属性直接显示就可以的了,当然,在显示之前还要绑定数据控件,否则也不会显示的!也有可能报错绑定数据控件语句如下set 文本框名称.datasource=ADO控件名称
Private Sub datagrid_lClick()Text1.Text = datagrid.TextMatrix(datagrid.RowSel, 1)
Text2.Text = datagrid.TextMatrix(datagrid.RowSel, 2)
Text3.Text = datagrid.TextMatrix(datagrid.RowSel, 3)End Sub