很好做啊，另外做一个界面，borderstyle=0，里面可以放一张图片什么的。再利用timer控件控制显示的时间。
Private i As Integer
Private Sub Form_Load()
i = 5 ''假设5秒关闭
Timer1.Interval = 1000 ''间隔1秒
Form2.Show vbModal ''显示欢迎窗口
End Sub
Private Sub Timer1_Timer()
i = i - 1
If i = 0 Then Unload Form2
End Sub
这个可能要自己编一下，可以建立一个类型为splash的窗体，在新建窗体的对话框里边可以选择的~~~
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024