我要在按下小键盘上的"*"键时,输入的是"×",我应怎样写代码?谢谢!

Angelnet 2003-10-17 05:10:39
谢谢!
...全文
43 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
layershow 2003-10-18
  • 打赏
  • 举报
回复
应该使用KeyPress事件
If (e.KeyChar = "*") Then
TextBox1.SelectedText = "×"
e.Handled = True
End If
所以那个乘号可以替换成非键盘上的字符
SqlDataAdapter 2003-10-18
  • 打赏
  • 举报
回复
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = Keys.Multiply Then
SendKeys.Send("{BACKSPACE}")
SendKeys.Send("{X}")

End If

End Sub
调试过没问题了.
lzg530 2003-10-18
  • 打赏
  • 举报
回复
你可以设一个变量,把按键“shift+8"的键值赋给小键盘上的"*"键,然后利用vb.net的获取键盘操作命令,令两者值相等就行了
TaichiTang 2003-10-18
  • 打赏
  • 举报
回复
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = Keys.Multiply Then
TextBox1.SelectedText = "X"
e.Handled = True
End If
End Sub

我也以为这样就可以了,但是我错了,我按小键盘上的"*"键时,出现的是:“X*”,那个*消不掉:(

我的是vb.net 2003
minajo21 2003-10-17
  • 打赏
  • 举报
回复
在控件keydown事件里判断keycode

16,549

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧