如何在显示模态窗体的时候让窗口先画！？？（急）在线等待

可以做一个Splash屏幕：frmSplash
frmSplash.Show
frmSplash.Refresh
Load Form1
Unload frmSplash
Form1.Show

解决方案 »

  1.   

    其实不必，你把FormLoad事件里面的代码都挪到Form_Activate事件里面，然后定义一个私有的模块级布尔型变量，用于标识窗体是否是Load，在FormLoad事件中将此变量置为True，在Form_Activate事件中首先判断此变量是否为True，若是则将其置为False，然后执行你刚才拷过去的代码；否则Exit Sub这样就可以解决你的问题了。
      

  2.   

    如果还不行，你在执行拷过去的代码前加上Me.Refresh这样就没问题了