VB作业,制作一个数字时钟,又图,非常感谢!
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/06/25 23:25:26
VB作业,制作一个数字时钟,又图,非常感谢!
Private Sub Timer1_Timer()
label1.caption = "今天是" & Format(Now(),"yyyy年m月d日") & WeekdayName(Weekday(Now(),vbSunday))
label2.caption = Format(Now(),"hh:mm:ss")
end sub
把TIMER1的interval设成1000
楼上你弄简单点,把人家吓到了
label1.caption = "今天是" & Format(Now(),"yyyy年m月d日") & WeekdayName(Weekday(Now(),vbSunday))
label2.caption = Format(Now(),"hh:mm:ss")
end sub
把TIMER1的interval设成1000
楼上你弄简单点,把人家吓到了