作者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