Foxtable(狐表)用户栏目专家坐堂 → 时间文本效验问题


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

主题:时间文本效验问题

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/7/9 8:51:00 [显示全部帖子]

TEXTBOX ,Validating事件

If  e.Sender.Value > "" Then
    Dim ary As String() = e.sender.Text.Split("-")
    If ary.Length <> 2 Then
        e.cancel = True
    Else
        If val(ary(1)) > 12 Then
            e.Cancel = True
        End If
    End If
End If

 回到顶部