vb 时间比较

答案:1 悬赏:80 手机版

解决时间 2021-04-13 05:56

提问者网友：谁的错
2021-04-12 15:26

设计了5个TEXT输入年月日小时和分钟进行定时执行任务当你输入的时间小于现在系统的时间执行按钮1的任务否则执行按钮2的任务我的程序: If Text1 < Year(Date) Then Call Command2_Click ElseIf Text1 <= Year(Date) & Text2 < Month(Date) Then Call Command2_Click ElseIf Text1 <= Year(Date) & Text2 <= Month(Date) & Text3 < Day(Date) Then Call Command2_Click ElseIf Text1 <= Year(Date) & Text2 <= Month(Date) & Text3 <= Day(Date) & Text4 < Hour(Time) Then Call Command2_Click ElseIf Text1 <= Year(Date) & Text2 <= Month(Date) & Text3 <= Day(Date) & Text4 <= Hour(Time) & Text5 <= Minute(Time) Then Call Command2_Click Else Call Command1_Click End If End Sub

最佳答案

五星知识达人网友：你可爱的野爹
2021-04-12 16:00

tempDate=cdate(text1 & "/" & text2 & "/" & text3 & " " & text4 & ":" & text5 & ":00")

if now<tempDate then

call Command1_click

else

call Command2_click

end if

我要举报

如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！