Question

VB 6.0中用msflexgrid控件修改数据库的代码怎么写

Answer 1

'MSHFlexGrid1是不能输入的，只有通过一个text来输入
Private Sub MSHFlexGrid1_Click()
Dim i As Long
With MSHFlexGrid1
If .Col = 1 Then
Text1.Text = Trim(.Text)
Text1.Left = .CellLeft - 10
Text1.Top = .CellTop - 10
Text1.Height = .CellHeight
Text1.Width = .CellWidth
Text1.Visible = True
Text1.SetFocus
Else
Text1.Visible = False
End If
End With
End Sub

'在text1中回车
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
'这里放入修改数据库的代码
End If
End Sub

Answer 2

你可以在MSFlexGrid中的任何单元放置文本、图片或这二者。Row和Col属性指定MSFlexGrid控件的当前单元。你可以在代码中指定当前单元，也可以在运行时使用鼠标或键盘改变当前单元。Text属性引用了当前单元中的文本。

追问

我知道的有文本框 但是我不知道代码怎么写 请高人告诉我代码需要怎么写