[VB.NET]Text控制只可以填写数字

前端之家收集整理的这篇文章主要介绍了[VB.NET]Text控制只可以填写数字前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
  1. PrivateSubTxtPrice_KeyPress(省略)HandlesTxtPrice.KeyPress
  2. '处理TEXT只可以输入数字和.键
  3. DimcAsChar
  4. c=e.KeyChar
  5. IfNot(Char.IsDigit(c)OrChar.IsControl(c)OrAsc(e.KeyChar)=46)Then
  6. '46表示按下的是.键
  7. e.Handled=True
  8. 'e.handled表示取消keypress事件
  9. EndIf
  10. EndSub

猜你在找的VB相关文章