败笔啊，全键盘操作落空了，关于文本框和msflexgrid

[lfshf]

我是想在文本框里键击上、下箭头键时，模拟在msflexgrid同样的击键，但是又不能转移焦点，目的是实现msflexgrid内容的键盘选择，目前我还只能用鼠标单击，败笔啊，全键盘操作落空了。

请指点，困扰很久的问题了。

[themayer]

不明白你的意思
照你这样的讲法，excel也做不到吧

[lfshf]

简单点

text1里击上、下箭头键＝msflexgrid里击上、下箭头键，text1焦点不转移，我看到有软件能办到的。

[lxcc]

上下键不改变textbox焦点,而是改变textbox的位置(相对于msflexgrid)

[haohaohappy]

sendkeys不是可以么？

[axer]

看你的意思应该是想用move 改变位置,textbox用于编辑和显示

[xfsfis]

在KeyPress事件中,再用sendkeys 上、下箭头键的code,不是就可以嗎?

[cosio]

用sendkeys

[lfshf]

我是楼主，我想大家还是不太明白我的意思

我的目的是，在文本框里填写代码查找数据库，然后在一个msflexgrid里显示查询的结果，那么有时候就会有重复的结果，这时候就要选择了，我就想在文本框里捕获键盘输入，在网格里实现选择。

[lfshf]

用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

送分了！