作业帮 > 综合 > 作业

vb 将数字转变成日期

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/05/16 18:16:21
vb 将数字转变成日期
Dim m,d,y As Integer
m = Month(Date)
d = Day(Date)
y = Year(Date)
t = "#" & m & "\" & d & "\" & y & "#"
a = Weekday(t)
我的目的就是为了判断今天是星期几,为什么这样写的话会显示 t = "#" & m & "\" & d & "\" & y & "#" 这句话出错?请问应该怎么解决?
改为下面代码就好了
Private Sub Command1_Click()
Dim m, d, y As Integer
m = Month(Date)
d = Day(Date)
y = Year(Date)
t = CDate(m & "/" & d & "/" & y)
a = Weekday(t)
End Su