[初学VB.net]如何通过控件的名称来控制控件

usersmj

于 2004-10-28 00:07:00 发布

阅读量2.6k

点赞数

分类专栏： VB.net（winform）文章标签： vb.net .net dataset textbox attributes integer

本文链接：https://blog.csdn.net/usersmj/article/details/155627

版权

这篇博客介绍了在VB.NET中如何利用FieldInfo类来访问和操作控件，特别是通过控件的名称来控制其行为。主要内容聚焦于公共属性的使用。

摘要由CSDN通过智能技术生成

     Imports System.Reflection

   Dim i As Integer
        Dim namestr As String
        For i = 0 To dataset_system.Tables("Company").Columns.Count - 1
            namestr = ""
            namestr = "Txt_Company_" & dataset_system.Tables("Company").Columns.Item(i).Caption
            Dim t As Type = Me.GetType
            Dim f As FieldInfo = t.GetField("_" & namestr, BindingFlags.NonPublic Or BindingFlags.Instance Or BindingFlags.Public)
            If dataset_system.Tables("Company").Columns.Item(i).Caption = "国际社" Then
                Dim MyControl As CheckBox = CType(f.GetValue(Me), CheckBox)
                MyControl.Enabled = chg
            Else
                Dim MyControl As TextBox = CType(f.GetValue(Me), TextBox)
                MyControl.Enabled = chg