程序加载顺序

Question

做一个splash window，在sub main()里加载并显示它，并加载frmmain，在frmmain加载好后设置它的visiable，并通知splash window关闭。这个其实很常用的啊
================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多，功能完备！★  浏览帖子速度极快！[建议系统使用ie5.5以上]。 ★  多种帖子实现界面。 
★  保存帖子到本地[html格式]★  监视您关注帖子的回复更新。
★  可以直接发贴、回复帖子★  采用XML接口，可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录！ 
★  支持在线检测程序升级情况，可及时获得程序更新的信息。★★ 签名  ●  
     可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe    [自解压]

Answer 1

比如你的主窗体为 frmMain, 封面为frmPic , 子窗体为Sub1 Sub2 ...可以这样做，把frmPic作为程序的启动窗体，在上面加一个Timer控件Timer1
可以在上面加上一幅漂亮的图片Private Sub frmPic_Load()
'需要的时间
Timer1.Interval = 3000 
Timer1.Enabled = True
Load frmMain
Load Sub1
Load Sub2
Load ........
End SubPrivate Sub Timer1_Timer()
Timer1.Enabled = False
Unload frmPic
frmMain.Show
End SubPrivate Sub frmMain_Load()
'初始化工作
End Sub Private Sub Sub1_Load()
'初始化工作
End Sub

Answer 2

zhang_rui(zhang_rui) 你好!
如果加进度条,而后根据程序大概的加载时间,给出进度.

Answer 3

gxingmin(小高) 你好!
该如写呢?现在我正忙着学C#,我想得到加进度条后源码.一定多给分.

Answer 4

比如你的主窗体为 frmMain, 封面为frmPic , 子窗体为Sub1 Sub2 ...
在frmPic上添加一个ProgressBar控件ProgressBar1可以这样做，把frmPic作为程序的启动窗体，在上面加一个Timer控件Timer1
可以在上面加上一幅漂亮的图片Private Sub frmPic_Load()
'你计算的加载时间除以ProgressBar1.Max得到，这里假设加载时间为10秒
Timer1.Interval = 100 
Timer1.Enabled = True
ProgressBar1.Max = 100
ProgressBar1.Min = 0
ProgressBar1.Value = ProgressBar1.Min
Load frmMain
Load Sub1
Load Sub2
Load ........
'如果加载程序的时间小于预计的时间，也要将进度条走到最后，显示主窗体
If (ProgressBar1.Value < ProgressBar1.Max) Then
    ProgressBar1.Value = ProgressBar1.Max
    call Timer1_Timer()
End If
End SubPrivate Sub Timer1_Timer()If (ProgressBar1.Value < ProgressBar1.Max - 1) Then
    ProgressBar1.Value = ProgressBar1.Value + 1
Else
    ProgressBar1.Value = ProgressBar1.Max
    Timer1.Enabled = False
    Unload frmPic
    frmMain.Show
End If
End SubPrivate Sub frmMain_Load()
'初始化工作
End Sub Private Sub Sub1_Load()
'初始化工作
End Sub