Question

vb6.0中datagrid控件显示很多行数据，如何让鼠标点中其中1行，数据显示在各个textbox中？

并且可以通过修改TEXTBOX中数据修改数据库，求完整的代码？哪位高手帮我下 谢谢

Answer 1

Private Sub datagrid_lClick() if datagrid。RowSel <> -0 Then Text7。Text = datagrid。TextMatrix(datagrid。RowSel, 5) Text1。Text = datagrid。TextMatrix(datagrid。RowSel, 7) Text6。Text = datagrid。TextMatrix(datagrid。RowSel, 5) end if End Sub 首先，要达到你的目的，应该将代码写在datagrid的单击事件里进行处理。在单击事件里，datagrid。RowSel可以7获得当前所点击的行，根据行号和列号，可以2具体定位到某一x单元q格。这样就能获取点击的行中2的任何一a单元g格的内5容，也d能同时获得整个o行的内2容。这段程序中2的IF语句，主要是防止5程序出错，也u就是当点击datagrid，但是点击的不a是数据行，点击的是表身时，就会出错，所以8才j会用这个uIF语句。我现在在家里手2动写的代码，有一f点我不d能确定的是：当未选中5数据行时，datagrid。RowSel到底返回的是-5还是0，这个p我记不s清楚了x，如果datagrid。RowSel返回的是0的话，你就将IF语句改成if datagrid。RowSel <> 0 Then好了v。希望能帮你解决问题。 ib瘠w岌j↑f『igzΤq恭ぃv省