摘要:
Module CheckTextbox '以下代码控制TextBox控件只能输入数值型字符串,具体内容如下: Public Sub CheckKeyPress(ByVal TargetTextBox As TextBox, ByVal e As System.Windows.Forms.KeyPressEventArgs, Optional ByVal Minus As Boolean = False, Optional ByVal DecimalCount As Integer = 0) Dim blnHandled As Boolean blnHan... 阅读全文