以文本方式查看主题
- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 动态赋值 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=178046)
|
-- 作者:rongping
-- 发布时间:2022/6/15 21:28:00
-- 动态赋值
您好!版主,假如我在窗口中有5个Label控件,分别命名为L1,L2,L3,L4,L5,这5个Label分别又在5个panel中,我想点击一下按钮,用一个集合通过循环赋值,下面的代码报错什么原因?Dim L As WinForm.Label Dim strs2() As String = {"博士", "力士", "青龙", "小耗", "将军"} For i As Integer = 0 To strs2.Count - 1 L= e.Form.Controls("L" & (i + 1)) L.Text = strs2(i) L.ForeColor = Clr Next
|
-- 作者:昱飞哥
-- 发布时间:2022/6/15 22:47:00
--
L= e.Form.Controls("L" & i + 1)
|
-- 作者:有点蓝
-- 发布时间:2022/6/16 8:55:00
--
报什么错?
|
-- 作者:rongping
-- 发布时间:2022/6/16 15:57:00
--
不存在该控件
|
-- 作者:rongping
-- 发布时间:2022/6/16 15:58:00
--
以下是引用有点蓝在2022/6/16 8:55:00的发言:
报什么错?是不是放在panel中的原因?
|
-- 作者:有点蓝
-- 发布时间:2022/6/16 16:06:00
--
和放在哪里没有关系。截图看看窗口设计器控件的名称
|
-- 作者:rongping
-- 发布时间:2022/6/16 17:10:00
--
此主题相关图片如下:5.jpg
以下是引用有点蓝在2022/6/16 16:06:00的发言:
和放在哪里没有关系。截图看看窗口设计器控件的名称
此主题相关图片如下:屏幕截图 2022-06-16 162145.jpg
代码:
Dim strs() As String = {"太岁", "晦气", "丧门", "贯索", "官符", "小耗", "大耗", "龙德", "白虎", "天德", "弔客", "病符"}
Dim t As WinForm.Label For i As Integer = 0 To strs.Length - 1 t = e.Form.Controls("t" & i + 1) t.Text = strs(i) t.ForeColor = Clr Next
|
-- 作者:有点蓝
-- 发布时间:2022/6/16 17:14:00
--
代码放在哪里哪个事件的?
|
-- 作者:rongping
-- 发布时间:2022/6/16 19:26:00
--
以下是引用有点蓝在2022/6/16 17:14:00的发言:
代码放在哪里哪个事件的?
记录按钮里面的
|
-- 作者:有点蓝
-- 发布时间:2022/6/16 20:39:00
--
请上传实例说明
|