主页 > 科技生活 >太行山上下载_在VB中怎样生成动态控件数组 >

太行山上下载_在VB中怎样生成动态控件数组

在VB中怎样生成动态控件数组
数组可以在设计阶段通过相同的名称属来建立,步骤如下:
a.在窗画出作为数组元素的各个控件;
b.单击包括到数组中的某个控件,将其激活;
c.在属性窗口选择名称属性,在设置框中键入控件的名称;
d.对每个要加入数组中的控件重复b,c步,设置相同的名称属性值,且在弹出的对话框中回答“是”,确立建立控件数组。

控件数组还可以在过程中用代码动态的生成,使用Load和UnLoad方法,例子如下:
在上建立两个命令按钮cmd1和cmd2,Caption属性分别设为Load和Unload;再建立一个包含两个单击按钮的控件数组,名称为Opt。
编写事件过程如下:
Option Explict
Dim maxidx as Integer
Private sub cmd1_click()
If maxidx = 0 Then maxidx = 1
maxidx = maxidx + 1
If maxidx > 4 Then
maxidx = maxidx - 1
Exit Sub
End If
Load Opt(maxidx)
Opt(maxidx).Top = Opt(maxdix-1).Top + 450
Opt(maxidx).Visible = True
End Sub

Private Sub cmd2_Click()
If maxidx < 2 Then Exit Sub
Unload Opt(maxidx)
maxidx = maxidx - 1
End Sub

Private Sub opt_Click(Index As Integer)
Select Case Index
Case 0
Print "Zero";
Case 1
Print "One";
Case 2
Print "Two";
Case 3
Print "Three";
Case 4
Print "Four";
End Select
End Sub
vb 中如何使用for循环给控件数组赋值
既然是数组控件了,直接改变下标就可以啦
for i=0 to 15
ob(i).left=0

next追问

我试过了 没用追答

就是这样用的,没用就不知道你哪里有问题了,看不到你代码和控件。
vb中控件数组的mousedown事件怎么写


command1的 GetDlgItem()->SetWindowText("Visual c++"); 响应command2的函数 GetDlgItem()->SetWindowText(""); VISUAL BASIC 大概也是这思,利用API实现
VB6.0中出现"Menu控件数组元素必须有索引"怎么办?
你是不是不止一个菜单名称为f的?如果有多个菜单名称为f的你必须给所有的名称为f的菜单额外分配一个索引,而且不能重复.
例如第一个名称为f的菜单索引那填0,第二个填1...你再仔细检查一下所有菜单项,至少有两个名称那里有重复了,不然不会出现这句话,电脑是不会出错的!本回答被网友采纳对不起,最佳答案是对的,你仔细看看一定是名称重复了。本回答被网友采纳

同样的问题,在窗口右击添加菜单编辑器就这样

图呢?


上一篇: 下一篇: