以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  typeof怎么直接获取值？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=90048)
--  作者：luodang2050
--  发布时间：2016/9/4 13:09:00
--  typeof怎么直接获取值？

For Each c As WinForm.Control In e.Form.Controls
    If Typeof c Is WinForm.TextBox Then \'判断控件是否是文本框
        Dim t As WinForm.TextBox = c \'使用特定类型的变量引用控件
        t.Value = Nothing
    End If
Next

如上：typeof必须通过判断才能知道类型，怎么直接获取类型值？

[此贴子已经被作者于2016/9/4 13:09:00编辑过]
--  作者：狐狸爸爸
--  发布时间：2016/9/4 16:09:00
--  
Return c.Gettype.name
--  作者：9EQ98
--  发布时间：2022/11/16 22:59:00
--  
为什么会报错：
For Each c As WinForm.Control In e.Form.Controls
    MESSAGEBOX.SHOW(c.Gettype.name)
    If Typeof c Is WinForm.FileManager Then \'判断控件是否 文件管理
        Dim F As WinForm.FileManager = c \'使用特定类型的变量引用控件
        MESSAGEBOX.SHOW(F.Name)
    End If
    \'If Typeof c Is WinForm.PictureViewer Then \'判断控件是否 文件管理
        \'Dim P As WinForm.PictureViewer
        \'MESSAGEBOX.SHOW(P.Name)
    \'End If
Next
--  作者：有点蓝
--  发布时间：2022/11/17 9:02:00
--  
报什么错？