VB中新建一个工程,包含两个窗体Form1,Form2。实现功能:开机时显示窗体1,显示时间为三秒,三秒后,器Form
展开全部
'呵呵,你问问题时超出字数了。三秒后要怎第样呢??显示form2,隐藏还是退出form1?还是其它,如果只是第一种,给你个代码。代码里有说明的,事先你在form1里加个计时器控件。
Private Sub Form_Load()
Timer1.Interval = 3000 '三秒一次触发事件
End Sub
Private Sub Timer1_Timer()
Timer1.Enabled = False '虽说这个程序加没加这句没关系。但是如果你窗体2里还有例如“form2.hide”的话,你就要加。不然你就等都每三秒检测你窗体2有没有显示吧
Form1.Hide '隐藏,注意不是退出啊,窗体1还在后台运行滴 完全退出的话就要写成“unload form1”
Form2.Show '显示窗体2
End Sub
Private Sub Form_Load()
Timer1.Interval = 3000 '三秒一次触发事件
End Sub
Private Sub Timer1_Timer()
Timer1.Enabled = False '虽说这个程序加没加这句没关系。但是如果你窗体2里还有例如“form2.hide”的话,你就要加。不然你就等都每三秒检测你窗体2有没有显示吧
Form1.Hide '隐藏,注意不是退出啊,窗体1还在后台运行滴 完全退出的话就要写成“unload form1”
Form2.Show '显示窗体2
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
最简单的方法是把程序的快捷方式放在:C:\Documents and Settings\Administrator\「开始」菜单\程序\启动 里面
然后程序里面写:
Private Sub Form_Load()
Timer1.Interval = 3000
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Form1.Hide
Form2.Show
End Sub
这里如果用sleep函数的话好像会出很多问题。。。
然后程序里面写:
Private Sub Form_Load()
Timer1.Interval = 3000
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Form1.Hide
Form2.Show
End Sub
这里如果用sleep函数的话好像会出很多问题。。。
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
设启动页为form1,在form1里加一个timer设置计数三秒后弹出form2,同时关闭form1 ,
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询