如何判断窗体中的控件类型.txt

VB技巧问答10000例 VB技巧问答10000例

你 可 以 使 用 TypeOf来 判 断 控 件 的 类 型 ， 具 体 例 子 可 以 参 考 QA001346 “如何使多个控件具有相同的事件过程”。 你 也 可 以 使 用 TypeName 函 数 ， 它 返 回 一 个 字 符 串 ， 表 示 对 象 的 类 型 ， 如 
     Dim cn As Control 
     For Each cn In Form1 
     Select Case TypeName(cn) 
     Case "CommandButton" 
     MsgBox "这 是 一 个 按 钮 " 
     Case "PictureBox" 
     MsgBox "这 是 一 个 图 片 框 。 " 
     End Select 
     Next 
<END>