以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 代码问题求助  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=33684)

--  作者:syeplay
--  发布时间:2013/5/22 17:08:00
--  [求助] 代码问题求助

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20130522170806.jpg
图片点击可在新窗口打开查看
我要规定文本框中 一 只输入数字 二 输入数字的前两位 必须是01-49这个范围内 该怎么写代码啊
--  作者:Bin
--  发布时间:2013/5/22 17:21:00
--  
设置掩码为 00     并且在TextChanged 事件中使用代码控制一下.

If not e.sender.text ="" Then
If val(e.sender.Text) >49 Then
    e.sender.text=49
End If
End If

--  作者:syeplay
--  发布时间:2013/5/22 17:28:00
--  
掩码不能设置为00 这样就只是两位了 我的意思是对前两位进行判断 而不是只能输入两位
--  作者:syeplay
--  发布时间:2013/5/22 17:55:00
--  
有谁在帮忙解答一下啊~~~~
--  作者:lsy
--  发布时间:2013/5/22 17:56:00
--  

Validating

If IsNumeric(e.Sender.Text) AndAlso Val(Left(e.Sender.Text,2)) > = 1 AndAlso Val(Left(e.Sender.Text,2)) < = 49 Then
    MessageBox.Show("好")
Else

    e.Sender.Text = ""
    MessageBox.Show("前两位数必须在01至49之间")
End If

[此贴子已经被作者于2013-5-22 17:58:59编辑过]

--  作者:syeplay
--  发布时间:2013/5/22 18:11:00
--  
高手啊 问题解决 非常感谢 不过这个代码我还得研究研究 还没看太懂 哈哈