请问大侠定时5秒后显示(我发了)三个字怎么写原码

用timer控件啊

用api也行，sleep

Private Sub Form_Load()
Timer1.Interval = 5000
End Sub

Private Sub Timer1_Timer()
Label1 = "我发了"
Timer1.Enabled = False
End Sub