[VB6 ] 時間延遲的問題
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
01/31 00:31, 1F
→
01/31 00:31, , 2F
01/31 00:31, 2F
→
01/31 08:02, , 3F
01/31 08:02, 3F
※ 編輯: wilson5215 來自: 218.166.40.199 (01/31 20:51)
推
01/31 21:08, , 4F
01/31 21:08, 4F
→
02/01 11:59, , 5F
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
討論串 (同標題文章)
以下文章回應了本文:
完整討論串 (本文為第 1 之 2 篇):