vb如何定义控件数组?

我想在代码中定义一个名为option1的控件数组(不是在设计窗口中画控件),该如何实现?... 我想在代码中定义一个名为option1的控件数组(不是在设计窗口中画控件),该如何实现? 展开
 我来答
ARTERIOSCLEROS
2008-10-12 · TA获得超过4184个赞
知道大有可为答主
回答量:1672
采纳率:0%
帮助的人:2443万
展开全部
但是也得先画第一个控件啊。画一个Option1,把他的Index设置为0.再建一个Command1用于添加其他的.
代码如下。
==========
Private Sub Command1_Click()
Load Option1(Option1.UBound + 1)
Option1(Option1.UBound).Visible = True
Option1(Option1.UBound).Move Option1(0).Left, Option1(Option1.UBound - 1).Top + Option1(0).Height
End Sub
ljl88900
2008-10-12 · TA获得超过2661个赞
知道大有可为答主
回答量:2197
采纳率:100%
帮助的人:2625万
展开全部
要定义option1控件数组,首先必须在设计窗口中画控件option1,并设index=0,然后才能用代码动态增加控件数组的数量。

如果直接在VB中增加控件,再取Index=0是不成功的,你试试看。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
卢卿接飞扬
2019-04-10 · TA获得超过3632个赞
知道大有可为答主
回答量:3221
采纳率:34%
帮助的人:191万
展开全部
你的过程名称不是数组控件的过程,你新建控件,复制黏贴就能弹出是不是要建立控件数组的提示,这就能建立控件数组,双击控件得到下面的过程名:
Private
Sub
Check1_Click(Index
As
Integer)
If
Check1(Index).Value
=
0
Then
Me.BackColor
=
&H8000000F
ElseIf
Check1(Index).Value
=
1
Then
Me.BackColor
=
&H8000000D
End
If
End
Sub
你再试试
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
uday100866
2008-10-12 · TA获得超过1933个赞
知道小有建树答主
回答量:903
采纳率:0%
帮助的人:786万
展开全部
Private Sub Form_Load()
Option1.Caption = "123345"
Option1.Value = False
End Sub
类似的输入的时候可以选择的~~
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式