以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  时间输入限制  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=154504)

--  作者:良才
--  发布时间:2020/9/16 16:47:00
--  时间输入限制
窗口时间输入框,格式Time,只能输入06:30-07:50之间,求代码?谢谢
--  作者:有点蓝
--  发布时间:2020/9/16 16:59:00
--  
输入框Validating事件

Dim s As String = Format(e.Sender.Value,"HH:mm")

If s < "06:30" OrElse s > "07:50" Then
    e.Cancel = True
    msgbox("只能输入xx时间")
End If

--  作者:良才
--  发布时间:2020/9/18 8:10:00
--  
谢谢