msflexgrid:你想使MSFLEXGRIDControl控

下载该文档文档格式：PDF 更新时间：2010-05-01 下载次数：0 点击次数：1

文档基本属性

文档语言：

Traditional Chinese

文档格式：

pdf

文档作者：

jean

关键词：

主题：

备注：

点击这里显示更多文档属性

msflexgrid:你想使MSFLEXGRIDControl控件可编辑吗
疯狂代码 http://CrazyCoder.cn/ :http:/CrazyCoder.cn/VisualBasic/Article52971.html 在MSFLEXGRIDControl控件中每个CELL格内容是不可以由用户直接编辑但是我们可以通过些小窍门技巧来方便实现这编辑功能来扩展MSFLEXGRID应用(在实际应用中这是很常用功能) 你只需按下面做即可轻松实现编辑MSFLEXGRIDControl控件数据功能例在窗体上放文本框text1和MSFLEXGRIDControl控件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, Sht 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, Sht As Integer) Select Case KeyCode Case vbKeyLeft, vbKeyRight, vbKeyUp, vbKeyDown KeyCode = 0
End Select End Sub ok,这样个可编辑MSFLEXGRIDControl控件就完成了简单吧!! 2009-1-15 16:30:28 疯狂代码 http://CrazyCoder.cn/

文档基本属性
文档语言：	Traditional Chinese
文档格式：	pdf
文档作者：	jean
关键词：
主题：
备注：
点击这里显示更多文档属性
经理：
单位：	isc
分类：
创建时间：
上次保存者：
修订次数：
编辑时间：
文档创建者：
修订：
加密标识：
幻灯片：
段落数：
字节数：
备注：
演示格式：
上次保存时间：