拖一个TextBox到窗体中,设置该TextBox的MultiLine属性为true,不然没有回车键效果!在该TextBox上双击,默认的事件为Change,更改为KeyPress事件,在该事件中添加代码如下:Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 9 Then
KeyAscii = 13
ElseIf KeyAscii = 13 Then
KeyAscii = 9
End If
End Sub运行后就能看到回车键和tab键互换了。原理就是该TextBox接收到按键后检测该键码是否为9或者13,如果是的话,将9换成13,13换成9,其他键码不做处理。应用在其他控件上的方法和应用在TextBox上十分类似,依葫芦画瓢!
温馨提示:答案为网友推荐,仅供参考