欢迎画面的图像显示，在程序启动的时候，图像有一瞬间的闪烁，那位有办法，送100分

Question

用picturebox显示欢迎图像，图像是gif格式，有90K

Answer 1

新建1个form,把picture属性弄成你的欢迎图像,调节适当大小,加入以下代码:
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)Private Sub Form_Paint()
Sleep 1000 '延迟一秒
Me.Hide  '本窗体隐藏
Form2.Show '主窗体显示,主窗体名字你可以另起
End Sub

Answer 2

假设你程序开始的时候显示的窗体为FORM1
在FORM1中放一个IMAGE控件
将IMAGE控件的大小调整为你需要的大小。在里面放你的图片，并它的STRETCH属性设为TRUE，这样里面的图片就可以自动缩放到你需要的大小了。（使用IMAGE控件占用资源比PICTUREBOX小很多，所以载入的速度也更快）
在你的程序中写以下代码：
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Form_Paint()
Sleep 1000 '延迟1000毫秒
Form2.Show '载入下一个窗体
UnLoad Me  '卸载本窗体，释放内存
End Sub
基本上和cso(sjxsoft)说的一样，只是换了个控件，使用IMAGE代替PICTUREBOX，并在退出的时候将窗体自身从内存中卸载。因为欢迎的界面一般只用显示一次，也就不必保存在内存中。
至于你所说的“一闪”我不明白指的是什么，因为我试了一下，并没有发现有闪烁的现象发生。
还有一个可能就是你的图片太大了，所以在载入窗体的时候用了较长的时间。你可以先用图像处理程序将你要载入的图片尺寸缩小一些。这样就可以加快载入的时间，图片的尺寸越小速度越快。
我有一个经验可以提供你参考一下：如果你要在窗体上显示的大小为800x600，那你只要把IMAGE控件的尺寸设为800x600，而将你的图片尺寸用图像处理软件调整到400x300，将IMAGE控件的STRETCH属性设为TRUE后载入该图片，IMAGE控件会把图片自动放大到800x600，并且图像的质量减少不多。

Answer 3

一闪的意思是，程序启动的时候，form先黑了一下，然后显示出欢迎图像。给人不舒服的感觉。明天我是以下两位的法子，先谢谢了

Answer 4

不知道flash控件能不能播放gif，要是能得话欢迎窗体上面＋个flash控件来播放gif

Answer 5

一闪的意思是，程序启动的时候，form先黑了一下，然后显示出欢迎图像。给人不舒服的感觉。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
不知你这“一黑”会黑多长时间？？？？如果黑的时间不长，可以试试：
Private Sub Form_Load()
Me.Hide
DoEvents
Me.Show
End Sub

Answer 6

可不可以把那个gif发过来试试？？？？
[email protected]