以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 数据输入问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=27366) |
||||
-- 作者:lswwsl -- 发布时间:2012/12/29 17:10:00 -- 数据输入问题 输入两个数据,要求必须输入为数字,并且数A和数B均在0-20之间,并且数B不能小于数A,但这个窗口代码写出来了,但不知道错在哪里了。希望高手们能指点指点。 |
||||
-- 作者:lswwsl -- 发布时间:2012/12/29 17:11:00 --
|
||||
-- 作者:狐狸爸爸 -- 发布时间:2012/12/29 20:30:00 -- 这种验证,不应该针对单个控件, 而是应该在“确定”按钮中统一验证,代码:
Dim v1 As Double = e.Form.Controls("textbox1").value Dim v2 As Double = e.Form.Controls("textbox1").value if v1 >0 AndAlso v1<=20 AndAlso v2 >0 Andalso v2 <= 20 And v2 >= v1 Then \'原确定按钮的代码 Else \'MessageBox.show("输入无效") End if
|