vb中如何判断TEXTBOX中的内容是不是日期格式
展开全部
Private Sub Command1_Click()
If Len(Text1.Text) <= 0 Then MsgBox "请输入日期!格式为(" & Date & ")": Exit Sub
If IsDate(Text1.Text) Then
MsgBox "是日期格式"
Else
MsgBox "不是日期格式,日期格式为(" & Date & ")"
End If
End Sub
If Len(Text1.Text) <= 0 Then MsgBox "请输入日期!格式为(" & Date & ")": Exit Sub
If IsDate(Text1.Text) Then
MsgBox "是日期格式"
Else
MsgBox "不是日期格式,日期格式为(" & Date & ")"
End If
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
if isdate(texet1.text) then msgbox"日期格式"
更多追问追答
追问
那么想要TEXTBOX中不为空的时候才进行判断日期格式，代码又如何写？
追答
trim(text1.text) ""
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
那要看你验证的是哪种日期格式了！
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
