VB编程问题。。会的朋友请帮帮忙回答下呀谢谢各位了

来源:百度知道 编辑:UC知道 时间:2024/06/04 06:08:14
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
Pri