主题：[求助]

希望在“条形码”列中按回车键自动在该单元格里面换行而不是切换到下一列，于是在keydownedit中写下代码：

If e.Col.Name = "条形码" AndAlso e.KeyCode = 13 Then
    sendkeys.Send(Chr(10))
    e.cancel = True
End If

可是执行却出现类似死循环，就是一直在该单元格里面换行！为什么呢！？

方法一：

 

http://www.foxtable.com/webhelp/scr/0134.htm

 

方法二：

 

If e.Col.Name = "条形码" AndAlso e.KeyCode = 13 Then
    Sendkeys.Send("{down}")
    e.cancel = True
End If

老师理解错意思了！并不是想让焦点移动到下一个单元格，而是在同一个单元格里面换行！如图：
此主题相关图片如下：tip3.jpg

我把keydownedit的sendkeys指令取消，在keypressedit上加了下面的代码好像可以了！

If e.Col.Name = "条形码" AndAlso e.Keychar = chr(13) Then
    sendkeys.Send(Chr(10))
End If

改代码

 

If e.Col.Name = "条形码" AndAlso e.KeyCode = 13 AndAlso e.Control = False Then
    Sendkeys.Send("^{Enter}")
    e.cancel = True
End If

测试可以！~谢谢老师！