VB6运行时类型检索

前端之家收集整理的这篇文章主要介绍了VB6运行时类型检索前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
如何在运行时获取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

猜你在找的VB相关文章