以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎么判断电脑的日期是否短日期格式呢?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88947)

--  作者:bagih
--  发布时间:2016/8/12 10:10:00
--  怎么判断电脑的日期是否短日期格式呢?
if today.date 是 短日期格式 then
MessageBox.Show("当前是短日期")
else
MessageBox.Show("请调整日期格式为‘短格式’")
end if

--  作者:大红袍
--  发布时间:2016/8/12 10:13:00
--  
If Cstr(Date.today).length = 10 Then
    MessageBox.Show("当前是短日期")
Else
    MessageBox.Show("请调整日期格式为\'短格式\'")
End If

--  作者:bagih
--  发布时间:2016/8/12 10:14:00
--  
谢谢红袍老师