我用一个txtEdit输入内容来修改表里的数据.可就是不成功.帮忙啊.大伙!

Question

'Active Cell
Private Type FlxCell
row As Long
col As Long
End Type
Private m_ActiveCell As FlxCell
Private Sub MSFlexGrid1_DblClick()
'Show Textbox for Input
If MSFlexGrid1.row > 0 Then
m_ActiveCell.row = MSFlexGrid1.row
m_ActiveCell.col = MSFlexGrid1.col
With txtEdit
.Top = MSFlexGrid1.CellTop + MSFlexGrid1.Top
.Left = MSFlexGrid1.CellLeft + MSFlexGrid1.Left
.Width = MSFlexGrid1.CellWidth
.Text = MSFlexGrid1.Text
Data1.Recordset.Edit
.Visible = True
.ZOrder
.SetFocusEnd With
End IfEnd Sub
Private Sub txtEdit_LostFocus()
'Write the Contents of the Textbox into the Grid and hide the Textbox
MSFlexGrid1.TextMatrix(m_ActiveCell.row, m_ActiveCell.col) = txtEdit.Text
txtEdit.Visible = False
Data1.Recordset.Update
Data1.Refresh
End Sub
我用一个txtEdit输入内容来修改表里的数据.可就是不成功.帮忙啊.大伙!

Answer 1

Private Sub Data1_Validate(Action As Integer, Save As Integer)
    Data1.Recordset.Edit
    txtEdit_LostFocus
    Data1.UpdateRecord
    Data1.Recordset.MoveLast
End Sub
我又加了一个还是不行!

Answer 2

上我的网站上看看,上面有此问题的源码.VB资料->查询“编辑MsFlexGrid表格控件的内容”；＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
免费的学习交流网站，欢迎大家访问！
http://www.j2soft.cn/

Answer 3

Data1控件绑定数据表？？　个人建议用ADO，自定义强，虽然写代码烦一点，不过通过代码出来的功能才是最完善的！

Answer 4

另外给你推荐几个VB的好网站，有空去那吸收吸收，有一些不错的东东： VB编程乐园 
专业的VB编程站点，大量的源代码，大量的开发文档，页面清晰，推荐 
http://www.vbeden.com/ AppleVB 主页 
网站设计的比较简洁，分类清晰，主要是收集了大量的开发代码供下载 
http://www.applevb.com/ 中国VB网--全力打造中国专业VB站点 
http://www.chinavb.net/
 
 VB新势力 
http://www.vbaspnew.com/
 
  Visual Basic Resource Center 
http://www.vb-code.net/ 
 
　 VB365.COM 
http://www.vb365.com

Answer 5

foreverstar2004(@风一样的城市风一样的男孩@) 能不能给个例子.谢谢了!