Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共12 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:[讨论]能否使用控件数组

1楼
sohper 发表于:2009/6/24 9:15:00
能否使用控件数组
2楼
yangming 发表于:2009/6/24 9:18:00
什么意思?
3楼
狐狸爸爸 发表于:2009/6/24 9:44:00
控件数组是VB6时代的,现在已经没有这个概念了
4楼
sohper 发表于:2009/6/24 10:38:00

谢谢两位,那么现在有没有办法, 可以达到VB6时代的控件数组的效果呢?

5楼
狐狸爸爸 发表于:2009/6/24 10:42:00
现在可以随便增加删除控件,要控件数组干什么?
6楼
sohper 发表于:2009/6/24 10:45:00
我想用来方便定义一些相同的控件 比如有 10个 Label  我要引用这10个Label
如果控件数组的话我就用一个循环声明,现在是否要分别声明呢?
7楼
狐狸爸爸 发表于:2009/6/24 10:48:00

用有规律的名称,例如 lb1,lb2,lb3...

for i as integer = 0 to x
   e.Form.Controls("lb" & i).Text =  "ddd"
next

8楼
yangming 发表于:2009/6/24 10:59:00
以下是引用狐狸爸爸在2009-6-24 10:48:00的发言:

用有规律的名称,例如 lb1,lb2,lb3...

for i as integer = 0 to x
   e.Form.Controls("lb" & i).Text =  "ddd"
next

我前段时间还在为这个烦呢,正好收藏了

9楼
sohper 发表于:2009/6/24 11:06:00

假如我现在有5个Label需要改Text参数 而且,内容都不一样。

比如有 Label1 至 Label5 我想引用的话

For i = 1 To 5
      Dim Lb (这里可以怎么做) As WinForm.Label = e.Form.Controls("Label" & i)

Next

Lb1.Text = "这里"
Lb2.Text = "哪里"
Lb3.Text = "那里"

10楼
狐狸爸爸 发表于:2009/6/24 11:14:00
用数组啊:

Dim lb(4) As WinFrom.Label
For i = 0 To 4
      Dim Lb (这里可以怎么做) As WinForm.Label = e.Form.Controls("Label" & (i+1) )

Next

共12 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 2 queries.