vb计时错误

[复制链接]
查看11 | 回复4 | 2009-6-6 17:04:42 | 显示全部楼层 |阅读模式
1.你的那个Timer1控件的Interval属性要设置为1000。2.在这些代码的最上面(也就是Private Sub Command1_Click()上面,加一句:Dim t1 As String)这样应该就可以了。如果还不行再通知我。...
回复

使用道具 举报

千问 | 2009-6-6 17:04:42 | 显示全部楼层
不应该用Now的...应该用Time..Private Sub Timer1_Timer()Form1.Label1.Caption = TimeIf Time = t1 ThenMsgBox "时间快到了!保存好工作,别让你的上司发现了,否则你会死得很惨的!注意啦,收好袈裟!打雷啦,下雨啦,收衣服啦!"Form1.ShowEnd I...
回复

使用道具 举报

千问 | 2009-6-6 17:04:42 | 显示全部楼层
在通用里面声明Private t1...
回复

使用道具 举报

千问 | 2009-6-6 17:04:42 | 显示全部楼层
应该用Timer...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行