如何知道form中使用了哪些部件？

Question

工程→部件→ShockwaveFlash
就可以用鼠标，在form1中生成一个flash的控件（部件），在属性栏的文件名处找到相应的flash文件,F5→在form1中可以显示相应的flash动画。
---------------------------------------
请问：如何知道form1中引用了ShockwaveFlash部件(flash控件)
同理，如何知道form中使用了哪些部件？
谢谢。

Answer 1

Dim obj As Object
For Each obj In Me.Controls
    If TypeName(obj) = "ShockwaveFlash" Then
        MsgBox "你引用了ShockwaveFlash控件,名称是：" & obj.Name
    End If
Next