通过控件的名称来控制控件,真郁闷,报错了,帮忙看看

doudouheweigege 2014-12-21 12:12:14

我想通过控件名称来控制控件,可运行到
Dim mycontrol1 As Label = CType(f.GetValue(Me), Label)
就出错了,我也不知道什么原因,忘高手帮忙

Imports System.Reflection
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim t As Type = Me.GetType
Dim f As FieldInfo = t.GetField("Label1", BindingFlags.NonPublic Or BindingFlags.Instance Or BindingFlags.Public)

Dim mycontrol1 As Label = CType(f.GetValue(Me), Label)
mycontrol1.BackColor = Color.Blue
End Sub
...全文
140 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧