怎样识别两个时间是否相等( 正在做定时关机)

polly_110 2003-11-08 11:46:28
我正在做一个定时关机的程序, 遇到了一点小问题, 输入一个时间(hh:mm:ss)到text1中,怎样判断它与系统时间是否相等,以及怎样调用系统时间,显示系统时间到text2中,timer1.interval=1000,我是初学VB 的 , 能否写得详细点啊!谢了.
...全文
36 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
polly_110 2003-11-08
  • 打赏
  • 举报
回复
Timer1.Interval = 500 Interval的值选多少比较好?我选的是1000,大约是一秒,可以吗?
polly_110 2003-11-08
  • 打赏
  • 举报
回复

输入到text1中的应该是字符,比如:12:12:12 它能直接与系统的时间进行大小比较吗?
射天狼 2003-11-08
  • 打赏
  • 举报
回复
Option Explicit

Private Sub Command1_Click()
If Time > Text1.Text Then MsgBox "d"
End Sub

Private Sub Form_Load()
Timer1.Interval = 500
End Sub

Private Sub Timer1_Timer()
Text1.Text = Time
End Sub
qjqmoney 2003-11-08
  • 打赏
  • 举报
回复
1、时间比较
If CDate(Text1.Text) >= Time Then
MsgBox "ok"
End If
2、显示系统时间到text2中
text2.text=time
danpianji2002 2003-11-08
  • 打赏
  • 举报
回复
失误text1.text="11:11:11"
danpianji2002 2003-11-08
  • 打赏
  • 举报
回复
text1.text=11:11:11 '输入
text2.text=time
可以了
polly_110 2003-11-08
  • 打赏
  • 举报
回复
在VB下能否用一个list框去选择时间(即采用鼠标选择时间,别的框也可以),因为用手输入时间比较麻烦。
jpinglee 2003-11-08
  • 打赏
  • 举报
回复
输入到text1中的应该是字符,比如:12:12:12 它能直接与系统的时间进行大小比较吗?
::能直接比较,只要按照hh:mm:ss的格式输入就行

Timer1.Interval = 500 Interval的值选多少比较好?我选的是1000,大约是一秒,可以吗?
::一般选interval<=1000合适
wanderstar 2003-11-08
  • 打赏
  • 举报
回复
这就要看你的精确度啦,其实我觉得定时关机的话设5秒一次都可以了!(这样占用的资源比较少)比如说你设定要11:11:11关机,那你就可以在timer里面比较当前时间是否大于11:11:11 而且小于11:11:16如果为真的话就触发关机事件

7,732

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧