你想使MSFLEXGRID控件可编辑吗

来源:计算机等级考试    发布时间:2012-08-29    计算机等级考试视频    评论

  在MSFLEXGRID控件中每一个CELL格的内容是不可以由用户直接编辑的但是我们可以通过一些小技巧来方便的实现这编辑功能来扩展MSFLEXGRID的应用(在实际应用中这是很常用的功能)。
  你只需按下面的做即可轻松实现编辑MSFLEXGRID控件数据的功能
  例在窗体上放一文本框text1,和一MSFLEXGRID控件flexgrid1
  加入下例代码
  Private Sub Form_Load()
  Text1.Move -10000, -10000, 1, 1
  End Sub
  Private Sub MSFlexGrid1_EnterCell()
  MSFlexGrid1.CellBackColor = vbBlue
  MSFlexGrid1.CellForeColor = vbWhite
  Text1.Text = MSFlexGrid1.Text
  Text1.SelStart = 0
  Text1.SelLength = Len(Text1.Text)
  End Sub
  Private Sub MSFlexGrid1_LeaveCell()
  MSFlexGrid1.CellBackColor = vbWhite
  MSFlexGrid1.CellForeColor = vbBlue
  End Sub
  Private Sub MSFlexGrid1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
  Text1.SetFocus
  End Sub
  Private Sub Text1_Change()
  MSFlexGrid1.Text = Text1.Text
  End Sub
  Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
  Select Case KeyCode
  Case vbKeyLeft, vbKeyRight, vbKeyUp, vbKeyDown
  KeyCode = 0
  End Select
  End Sub
  ok,这样一个可编辑的MSFLEXGRID控件就完成了,简单吧!!

视频学习

我考网版权与免责声明

① 凡本网注明稿件来源为"原创"的所有文字、图片和音视频稿件,版权均属本网所有。任何媒体、网站或个人转载、链接转贴或以其他方式复制发表时必须注明"稿件来源:我考网",违者本网将依法追究责任;

② 本网部分稿件来源于网络,任何单位或个人认为我考网发布的内容可能涉嫌侵犯其合法权益,应该及时向我考网书面反馈,并提供身份证明、权属证明及详细侵权情况证明,我考网在收到上述法律文件后,将会尽快移除被控侵权内容。

最近更新

社区交流

考试问答