请问如何判断控件的类型？即我给一个函数传递一个Control甚至是Object型的参数，如何在函数内部判断它是Form，还是Frame，还是什么？

Question

请问如何判断控件的类型？即我给一个函数传递一个Control甚至是Object型的参数，如何在函数内部判断它是Form，还是Frame，还是什么？

Answer 1

使用TypeOf 关键字
例子:
Sub ControlProcessor(MyControl As Control)
   If TypeOf MyControl Is CommandButton Then
      Debug.Print "You passed in a " & TypeName(MyControl)
   ElseIf TypeOf MyControl Is CheckBox Then
      Debug.Print "You passed in a " & TypeName(MyControl)
   ElseIf TypeOf MyControl Is TextBox Then
      Debug.Print "You passed in a " & TypeName(MyControl)
   End If
End Sub

Answer 2

typename()可以返回控件的类型名称