[VB6 ] 時間延遲的問題

看板Visual_Basic作者 (啊?)時間15年前 (2009/01/30 23:08), 編輯推噓2(205)
留言7則, 4人參與, 最新討論串1/2 (看更多)
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

01/31 00:31, , 1F
印象中延遲一秒好像是Delay 1000
01/31 00:31, 1F

01/31 00:31, , 2F
Text3.text = b
01/31 00:31, 2F

01/31 08:02, , 3F
時間延遲還是沒解決 沒有Delay這個Function
01/31 08:02, 3F
※ 編輯: wilson5215 來自: 218.166.40.199 (01/31 20:51)

01/31 21:08, , 4F
sleep要用api
01/31 21:08, 4F

02/01 11:59, , 5F
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseco
02/01 11:59, 5F

02/01 12:00, , 6F
這行要擺哪裡啊 我怎麼擺都不行
02/01 12:00, 6F

02/03 07:12, , 7F
模組的開頭
02/03 07:12, 7F
文章代碼(AID): #19WnVZzh (Visual_Basic)
文章代碼(AID): #19WnVZzh (Visual_Basic)