我有这个代码
Private Sub PortField_KeyPress(sender As Object, e As KeyPressEventArgs) Handles PortField.KeyPress
If (Not IsNumeric(e.KeyChar)) Then
e.KeyChar = ChrW(0)
ToolTip1.Show("N'entrez que des chiffres, merci.", PortField, 103, 10, 1000)
End If
End Sub
因此,当事件被触发(写一封信)时,它应该在我询问的位置显示一个工具提示。
问题是工具提示,当我单击一个字母键时会出现这样的
但是当我双击一个字母键时,它看起来像这样
所以我不明白为什么它不起作用,我可以使用一些帮助谢谢