vb datagrid 问题

来源:百度知道 编辑:UC知道 时间:2024/05/16 08:04:04
窗体上两个command按钮,一个datagrid控件,三个文本框
要求,点击datagrid中的任意行,其行中数据自动在三个文本框中体现,编辑文本框中内容,单击command按钮(修改),datagrid及数据库中内容也随之改变!
谢谢!
没看懂!!!

试下我这个代码,窗体上只有 一个文本框 一个 GRID 一个按钮
Private Sub Command1_Click()
Grid1.Rows = Grid1.Rows + 1
End Sub

Private Sub Form_Load()
Text1.Visible = 0
Grid1.Cols = 4
Grid1.Rows = 2
Grid1.FixedCols = 0
Grid1.FixedRows = 1

Grid1.ColWidth(0) = Grid1.Width * 0.05
Grid1.ColWidth(1) = Grid1.Width * 0.4
Grid1.ColWidth(2) = Grid1.Width * 0.12
Grid1.ColWidth(3) = Grid1.Width * 0.06

Grid1.Row = 0
Grid1.Col = 0
Grid1.Text = "数据列1"
Grid1.Col = 1
Grid1.Text = "数据列2"
Grid1.Col = 2
Grid1.Text = "数据列3"
Grid1.Col = 3
Grid1.Text = "数据列4"

End Sub

Private Sub Grid1_DblClick()
Text1.Visible = 0
Text1.Left = Grid1.Left
Text1.Top = Grid1.Top
Text1.Visible = 1

For I = Grid1.LeftCol To Grid1.Col - 1
Text1.Left = Text1.Left + Grid1.ColWidth(I) + 15
Next
For I = Grid1.TopRow To Grid1.Ro