如何用VB编动画效果

Question

我想在一个销售管理系统软件最开始加载动画效果，请问需要做些什么呢？

Answer 1

e.g:webbrowser + *.gif
timer + jpg(s)
webbrowser+ *.swf

Answer 2

不知道这个可不可以是用几张图片再连接起来的.
Private Sub Timer1_Timer()
Dim j As Integer
If i >= 0 Then
Picture1.Cls
j = i Mod 4 + 1
FileName = "f:\新建文件夹\as" & j & ".jpg"
Picture1.Picture = LoadPicture(FileName)
i = i + 1
End If
End Sub