Foxtable(狐表)用户栏目专家坐堂 → [求助] 代码问题求助


  共有4701人关注过本帖树形打印复制链接

主题:[求助] 代码问题求助

帅哥哟,离线,有人找我吗?
syeplay
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:81 积分:923 威望:0 精华:0 注册:2011/4/25 11:01:00
[求助] 代码问题求助  发帖心情 Post By:2013/5/22 17:08:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20130522170806.jpg
图片点击可在新窗口打开查看
我要规定文本框中 一 只输入数字 二 输入数字的前两位 必须是01-49这个范围内 该怎么写代码啊

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By: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
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:81 积分:923 威望:0 精华:0 注册:2011/4/25 11:01:00
  发帖心情 Post By:2013/5/22 17:28:00 [只看该作者]

掩码不能设置为00 这样就只是两位了 我的意思是对前两位进行判断 而不是只能输入两位

 回到顶部
帅哥哟,离线,有人找我吗?
syeplay
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:81 积分:923 威望:0 精华:0 注册:2011/4/25 11:01:00
  发帖心情 Post By:2013/5/22 17:55:00 [只看该作者]

有谁在帮忙解答一下啊~~~~

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By: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
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:81 积分:923 威望:0 精华:0 注册:2011/4/25 11:01:00
  发帖心情 Post By:2013/5/22 18:11:00 [只看该作者]

高手啊 问题解决 非常感谢 不过这个代码我还得研究研究 还没看太懂 哈哈

 回到顶部