大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
input type="text" maxlength="11" /这是控制最大输入字数至于不能少于11个字,需要在点击保存按钮时,通过.length来控制
成都创新互联专注于博山网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供博山营销型网站建设,博山网站制作、博山网页设计、博山网站官网定制、微信平台小程序开发服务,打造博山网络公司原创品牌,更为您提供博山网站排名全网营销落地服务。
以下是只能输入数字和小数点,并且小数点只能输入一次
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Textbox1.KeyPress
If Char.IsDigit(e.KeyChar) or e.KeyChar = Chr(8) or e.KeyChar = "." Then
If e.KeyChar = "." And InStr(TextBox1.Text, ".") 0 Then
e.Handled = True
Else
e.Handled = False
End If
Else
e.Handled = True
End If
End Sub
第一,对话框的提示内容中说明一下,其次,对话框关闭后,检查其返回值是否数字,如果不是就再显示该对话框,使用循环形式