怎样用timer控件来控制窗体的登陆与卸载

yunboonline 2003-05-10 05:02:53

请教各位timer控件

...全文

70 2 打赏收藏转发到动态举报

写回复

用AI写文章

2 条回复

切换为时间正序

请发表友善的回复…

发表回复

shuchang0626 2003-05-10

打赏
举报

'timer 控件所在的窗体加载
Private Sub Form_Load()
Timer1.Interval = 3500
Screen.MousePointer = 11
End Sub

'加载另外一个窗体
Private Sub Timer1_Timer()
Form2.Show '若要卸载,则改成unload form2就行了
Screen.MousePointer = 1
Unload Me
End Sub

guoshous 2003-05-10