用VB怎么把现在有的FLASH导入

新建一个工程
在菜单栏上依次
工程——部件——控件中的“Shockwave flase"勾选，——确定
然后回到工具栏上，多了一个控件，
在窗体上脱出这个控件，，
在控件的movie属性写上你现在的FLASH的路径，如 C:\VB\工程2\heart[1].swf
或者（文件在当前目录下，这里heart[1].swf为文件名：
Private Sub Form_Load()
ShockwaveFlash1.Movie = App.Path + "\heart[1].swf"
End Sub

不知是不是你要的答案？