按键精灵qui界面怎么加循环就死了
EventForm1.Button1.ClickDo输入时间=Form1.InputBox1.TextDim时间时间=NowIf时间=输入时间ThenMessageBox...
Event Form1.Button1.Click
Do
输入时间 = Form1.InputBox1.Text
Dim 时间
时间 = Now
If 时间 = 输入时间 Then
MessageBox 时间
exit do
End If
Loop
End Event 展开
Do
输入时间 = Form1.InputBox1.Text
Dim 时间
时间 = Now
If 时间 = 输入时间 Then
MessageBox 时间
exit do
End If
Loop
End Event 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |