以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助几个小问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=48755)

--  作者:小白小黑
--  发布时间:2014/4/4 12:38:00
--  求助几个小问题

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:时间.rar

1:编号框只能输入7到9位数字,输入不对就提示输入不对

2:姓名框的输入内容如果不在表A中的姓名列中,就提示输入的姓名不是有效的.

3: 开始日期怎样可以显示为2014-4-4 00:00:00    结束日期显示为2014-4-4 23:59:59且默认为当天的23:59:59


图片点击可在新窗口打开查看此主题相关图片如下:无标题.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2014-4-4 13:27:10编辑过]

--  作者:Bin
--  发布时间:2014/4/4 14:13:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:时间.table

第二个问题我个人觉得,如期如此,不如不允许输入,只能使用下拉框选择姓名好了.
--  作者:lsy
--  发布时间:2014/4/4 14:25:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:时间.table


--  作者:小白小黑
--  发布时间:2014/4/4 15:11:00
--  

第一个问题

 

我这样写只能判断输入的个数,那要怎样判断输入的是数字而不是别的字符了

Dim bh As WinForm.TextBox = e.Form.Controls("bh")

If  bh.value Like "#######" Or bh.value Like "#########" Then
Else
MessageBox.Show("请输入的7到9位编号")
End If


--  作者:Bin
--  发布时间:2014/4/4 15:12:00
--  
参考2楼 或者用 IsNumeric http://www.foxtable.com/help/topics/1514.htm