如何在运行时获取VB6中的Object类型(作为字符串的名称就足够了)？
即：
- If Typeof(foobar) = "CommandButton" Then ...
/编辑：澄清一下,我需要检查动态类型对象.一个例子：
- Dim y As Object
- Set y = CreateObject("SomeType")
- Debug.Print( <The type name of> y)
输出将是“CommandButton”
我认为你要找的是TypeName而不是TypeOf.
- If TypeName(foobar) = "CommandButton" Then
- DoSomething
- End If
编辑：你是什么意思动态对象？你的意思是用它创建的对象
CreateObject(“”),因为它应该仍然有效.
编辑：
- Private Sub Command1_Click()
- Dim oObject As Object
- Set oObject = CreateObject("Scripting.FileSystemObject")
- Debug.Print "Object Type: " & TypeName(oObject)
- End Sub
对象类型：FileSystemObject