作者wilson5215 (啊?)
看板Visual_Basic
标题[VB6 ] 时间延迟的问题
时间Fri Jan 30 23:08:18 2009
Private Sub Text2_KeyPress(KeyAscii As Integer)
b = Text2.Text
If KeyAscii = 13 Then
KeyAscii = 0
Label2.Visible = True
Open App.Path & "\temp.txt" For Append As #1
Print #1, Text2.Text
Close #1
<---------------------我想在这里加入延迟一秒
Image1.Visible = True 但是我无法使用Delay或Sleep
Text1.Visible = False 不知道为什麽
Text2.Visible = False
Text3.Visible = True
End If
End Sub
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 218.166.26.7
1F：→ Whisperg:印象中延迟一秒好像是Delay 1000 01/31 00:31
2F：→ Whisperg:Text3.text = b 01/31 00:31
3F：→ wilson5215:时间延迟还是没解决 没有Delay这个Function 01/31 08:02
※ 编辑: wilson5215 来自: 218.166.40.199 (01/31 20:51)
4F：推 Y78:sleep要用api 01/31 21:08
5F：→ wilson5215:Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseco 02/01 11:59
6F：→ wilson5215:这行要摆哪里啊 我怎麽摆都不行 02/01 12:00
7F：推 fumizuki:模组的开头 02/03 07:12