VB6运行时类型检索

发布时间：2020-12-17 00:31:12 所属栏目：大数据来源：网络整理

导读：如何在运行时获取VB6中的Object类型(作为字符串的名称就足够了)？即： If Typeof(foobar) = "CommandButton" Then ... /编辑：澄清一下,我需要检查动态类型对象.一个例子： Dim y As Object Set y = CreateObject("SomeType")Debug.Print( The type name of

如何在运行时获取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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!