vb控件数组怎么写代码
答:vb.net和vb6.0不同,无法直接使用控件数组。不过可以通过其他方式变通一下。比如现在有10个label,要将这10个label的text属性统一设置为“这是第X个标签”(X为1-10)。1.建立10个label,名称分别为label1、label2、label3。。label10 2.代码:For i = 1 To 10 Me.FindControl("label" & i)...
答:1、控件数组:指具有相同name属性的控件集合。通过使用控件数组,可以使这些控件共享相同的事件过程。也可以通过参数Index来区分是哪个控件触发的事件。同一控件数组中,每个控件可以有各自不同的属性设置。2、控件数组建立以后必须通过Index属性来区分它们。3、优点:节省代码,增加可读性,同时也减少了内存的...
答:控件数组还可以在过程中用代码动态的生成,使用Load和UnLoad方法,例子如下:在窗体上建立两个命令按钮cmd1和cmd2,Caption属性分别设为Load和Unload;再建立一个包含两个单击按钮的控件数组,名称为Opt。编写事件过程如下:Option Explict Dim maxidx as Integer Private sub cmd1_click()If maxidx = 0...
答:1、要建控件数组需要先建一个command1,index设置为0。不想让他显示可以隐藏这个command1。2、然后下面代码:Private Sub Form_Load() Load Command1(1)'例子只增加了1个也就是Command1(1) Command1(1).Top = Command1(0).Top + Command1(0).Height Command1(1).Visible = TrueEnd...
答:要使用控件数组,设计时必须建立一个控件,如 设计时建立一个文本框,名称为 Text1 ,设置 Index 属性( 0 到 32767 之间的任意整数)控件数组的下标可以不连续,用到哪个就添加哪个 如果运行时只需要建立一个 Text1(10) ,用代码 Load Text1(10)最好再设置 Visible 属性(默认为 False )和位置 ...
答:1种是直接添加 '下面添加了一个richtext myfrom.Controls.Add("RichText.RichTextctrl.1", "text1", myform)‘ 添加textbox myfrom.Controls.Add("vb.TextBox", "text1", myform)2 一种是控件数组生成 首先窗口上放一个控件索引定位0,比如先放置一个textbox1(0)生成代码 load textbox1(1...
答:在各个函数的外部定义的数组,是全局变量,可以在多个按钮控件里可以重复利用的。例如:Dim a(20) As Integer Private Sub Command1_Click()For i = 1 To 20 a(i) = 10 * i Next i End Sub Private Sub Command2_Click()For i = 1 To 20 Print a(i);If i Mod 10 = 0 Then Print...
答:使用for each ... next语句,例如:在一个窗体建立一个Text1()文本框数组,设置一些不连续的Index,放置一个Text2文本框(设置多行,滚动条),复制一下代码,运行后,所有Text1的文本内容就会全部复制到Text2中 Option Explicit Dim i As Object Private Sub Form_Load()For Each i In Text1 Te...
答:是”进行创建,并将新建的命令按钮拖到合适的位置。按这样的方法,在复制、粘贴,创建两个命令按钮,根据创建的先后,其Index属性依次是0、1、2、3.将它们的caption属性分别改为+、-、*、/。这样就利用VB6.0的控件数组制作好了简易计算器的界面,接下来只要编写相关代码即可完成简易计算器的制作。
答:建立一个Label()数组,比如是Label1()吧,在程序上建立一个Label1然后把它复制再粘贴就会提示是否建立数组,就点是,我建立了一个Label1数组,该数组中包含3个Label控件,按你说的代码是这样写的 第一种 用 Select Case 代码如下 Private Sub Label1_Click(Index As Integer)Select Case Index C...
网友评论:
方磊14783206893:
VB控件数组text如何编写程序
49630人眨
: 添加一个控件数组(textbox)Text1(0) Private Sub Form_Load() For I = 1 To 10 Load Text1(I) Text1(I).Left = 0 Text1(I).Top = (Text1(I).Top + Text1(I).Height) * I Text1(I).Visible = True Next I For I = 0 To 10 Text1(I).Text = "数组控件:" & I Next I End Sub
方磊14783206893:
VB6中怎么用代码实现添加控件数组 -
49630人眨
: 首先添加一个label,在属性里把index设为0 添加一个按钮 加入代码 For i = 1 To 2 Load Label1(i) Label1(i).Left = Label1(i - 1).Left + Label1(i - 1).Width + 100 Label1(i).Visible = True Next
方磊14783206893:
VB中控件数组如何使用 -
49630人眨
: 数组控件中属性都是一样的,就“索引”不同.所以控件数组一般都会通过循环语句进行控制. 电脑的屏保“变幻线”就使用了Line与Laber控件数组
方磊14783206893:
求VB的数组程序代码(高分求!!) -
49630人眨
: 1. 使用数组的静态定义和动态定义方式 静态定义:一维数组:DIM X(10),定义了一个含有11个元素的一维数组,或 DIM X(1 TO 10),定义了一个含有10个元素的一维数组 二维数组:DIM X(10,10),定义了一个含有11*11个元素的二维数组,或 ...
方磊14783206893:
求助控件数组(VB) -
49630人眨
: For Each MyControl In MeIf TypeName(MyControl) = "TextBox" ThenMyControl.Top = 100End IfNext遍历本窗体所有控件,如果控件的类别为TextBox,那么设置它的高度为100
方磊14783206893:
vb 的数组控件怎么弄,比如说三个COMMAND数组....
49630人眨
: 拖出一个command1控件到窗体,然后复制它,再粘贴到窗体即创建控件数组,你要多少个就粘贴多少个.下标由0开始,比如 Command1(0) Command1(1) Command1(2)...... 引用时,直接引用下标即可.
方磊14783206893:
VB 中设计计算器怎么使用控件数组啊 急求!!! -
49630人眨
: 需要把数字按钮做成数组控件?复制在粘贴就自动出来了啊 写单击代码的时候 Private Sub Command1_Click(Index As Integer) Select Case (Index) Case 0 MsgBox "第一个按钮" Case 1 MsgBox "第二个按钮" End Select End Sub
方磊14783206893:
vb中如何在只有窗体的情况下创建一个commandbutton控件数组 -
49630人眨
: 1、要建控件数组需要先建一个command1,index设置为0.不想让他显示可以隐藏这个command1.2、然后下面代码:Private Sub Form_Load() Load Command1(1)'例子只增加了1个也就是Command1(1) Command1(1).Top = Command1(0).Top + Command1(0).Height Command1(1).Visible = True End Sub3、如果只有窗体,没有command1,只能用Controls.Add方法键一个command1,但是无法建立控件数组.
方磊14783206893:
VB 控件数组 -
49630人眨
: 每个控件都有Index属性吧?你在设计时把这个属性赋值(一般为“0”)就相当于你创建了一个控件数组 给你个应用控件数组的例子: 首先,建一个Command控件(Name为Command1) 再建一个Label控件(Name为Label1,Index为0) 注意...
方磊14783206893:
在vb中如何用代码实现控件数组中的每个控件的功能,比如一个计算器的程序 -
49630人眨
: 没说清楚吧 比如计算器 0~9 按纽就是一组控件 将他们的index设置为0~9 然后单机事件里判断 index的值就知道是点了哪个按纽了.