7518
社区成员
败笔啊，全键盘操作落空了，关于文本框和msflexgrid
我是想在文本框里键击上、下箭头键时，模拟在msflexgrid同样的击键，但是又不能转移焦点，目的是实现msflexgrid内容的键盘选择，目前我还只能用鼠标单击，败笔啊，全键盘操作落空了。
请指点，困扰很久的问题了。
请指点，困扰很久的问题了。
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
lfshf 2004-10-07
用sendmessage也不行，sendkeys更不可能！因为网格不接受键盘的上下箭头键
自己解决了，主要代码如下：
Private Sub text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 38 Then
If GridTip.Row > 1 Then
GridTip.Row = GridTip.Row - 1
GridTip.ColSel = 14
End If
ElseIf KeyCode = 40 Then
If GridTip.Row < GridTip.Rows - 1 Then
GridTip.Row = GridTip.Row + 1
GridTip.ColSel = 14
End If
End If
End Sub
送分了！
自己解决了，主要代码如下：
Private Sub text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 38 Then
If GridTip.Row > 1 Then
GridTip.Row = GridTip.Row - 1
GridTip.ColSel = 14
End If
ElseIf KeyCode = 40 Then
If GridTip.Row < GridTip.Rows - 1 Then
GridTip.Row = GridTip.Row + 1
GridTip.ColSel = 14
End If
End If
End Sub
送分了！
lfshf 2004-10-07
我是楼主，我想大家还是不太明白我的意思
我的目的是，在文本框里填写代码查找数据库，然后在一个msflexgrid里显示查询的结果，那么有时候就会有重复的结果，这时候就要选择了，我就想在文本框里捕获键盘输入，在网格里实现选择。
我的目的是，在文本框里填写代码查找数据库，然后在一个msflexgrid里显示查询的结果，那么有时候就会有重复的结果，这时候就要选择了，我就想在文本框里捕获键盘输入，在网格里实现选择。
cosio 2004-10-06
用sendkeys
xfsfis 2004-10-06
在KeyPress事件中,再用sendkeys 上、下箭头键的code,不是就可以嗎?
axer 2004-10-06
看你的意思应该是想用move 改变位置,textbox用于编辑和显示
haohaohappy 2004-10-06
sendkeys不是可以么？
lxcc 2004-10-05
上下键不改变textbox焦点,而是改变textbox的位置(相对于msflexgrid)
lfshf 2004-10-05
简单点
text1里击上、下箭头键＝msflexgrid里击上、下箭头键，text1焦点不转移，我看到有软件能办到的。
text1里击上、下箭头键＝msflexgrid里击上、下箭头键，text1焦点不转移，我看到有软件能办到的。
themayer 2004-10-05
不明白你的意思
照你这样的讲法，excel也做不到吧
照你这样的讲法，excel也做不到吧
vb msflexgrid MSFlexGrid控件显示和操作表格数据。其对包含字符串和图片的表格提供了灵活的排序、插入数据和格式编排功能。当与Data控件绑定时，MSFlexGrid控件只显示只读数据
vb中MSFlexgrid 和 MSHFlexgrid 的区别以及详解 简单地说,MSFlexGrid和MSHFlexGrid之间的区别，主要是后者支持ADO的层次显示。如果你不使用ADO，可以考虑MSFlexGrid，否则建议使用MSHFlexGrid。 这两个控件的详解: MSFlexGrid控件 MicrosoftFlexGrid(MSFlexGrid...
VB编程：利用数组设置MSFlexGrid表头和列宽-34 运行效果： 程序源码： ... MSFlexGrid1.Rows = 10 MSFlexGrid1.Cols = 6 s = Array("300", "1200", "1300", "1500", "1200", "1200"
如何使MsFlexGrid控件具有编辑功能 头文件和 MyEditGrid.cpp 源文件 5. 在 gridDlg.h （对话框类文件）中添加头文件 : #include “MyEditGrid.h” 修改变量声明： CMSFlexGrid m_flex; ...
VB Excel导入 MSFlexGrid 批量导入SQL2000 然后MSFlexGrid 数据生成Excel VB Excel导入 MSFlexGrid 批量导入SQL2000 然后MSFlexGrid 数据生成Excel
