Điều khiển thời gian

[gakon001]

Các anh chị giúp em phát này với, em muốn điều chỉnh thời gian một textbox hay một label hay đoại loại như thế hiện ra hay mất đi trong một khoảng hay tại một thời điểm nào đó...cho em xin code với ạ
Cụ thể: bật form lên, sau 5s, hiện ra một cái label, sau 1s kế, hiện ra một textbox....
Em cảm ơn trc

 

[ndu96081631]

Các anh chị giúp em phát này với, em muốn điều chỉnh thời gian một textbox hay một label hay đoại loại như thế hiện ra hay mất đi trong một khoảng hay tại một thời điểm nào đó...cho em xin code với ạ
Cụ thể: bật form lên, sau 5s, hiện ra một cái label, sau 1s kế, hiện ra một textbox....
Em cảm ơn trc

Ví dụ thế này:

Private Sub UserForm_Initialize()
  Me.Label1.Visible = False
  Me.TextBox1.Visible = False
End Sub

Private Sub UserForm_Activate()
  Application.Wait Now + TimeValue("00:00:05")
  Me.Label1.Visible = True
  DoEvents
  Application.Wait Now + TimeValue("00:00:01")
  Me.TextBox1.Visible = True
  Me.Repaint
End Sub