99问答网
所有问题
当前搜索:
vb数组控件使用方法
VB怎么用
代码创建
控件数组
?
答:
先定义一个控件(Option1),然后修改index值为0 ,就创建了
控件数组
,设置你要创建控件数组的其它属性.\x0d\x0aPrivate Sub Form_Load()\x0d\x0a Dim i%\x0d\x0a For i = 1 To 3\x0d\x0a Load Option1(i) 这句是关键,,,\x0d\x0a Option1(i).Top = Option1...
VB中控件数组
在VB.NET中
用法
,请给一个例子
答:
VB
.net中没有
控件数组
的说法。替代
方法
:·创建一个控件的类型数组: Button[],将所有的button控件创建好后存进去,可以遍历它;·或将所有要遍历的控件放在一个容器如Panel中,以后遍历这个容器的子控件即可。--- 你的情况,推荐放在容器中。比如下面就是一个遍历容器的控件,然后找出所有的文本框并...
vb
的
数组控件
怎么弄,比如说三个COMMAND数组...
答:
拖出一个command1控件到窗体,然后复制它,再粘贴到窗体即创建
控件数组
,你要多少个就粘贴多少个。下标由0开始,比如 Command1(0)Command1(1)Command1(2)...引用时,直接引用下标即可。
vb控件数组
问题
答:
控件数组
在软件编程中用途很广,尤其是解决多个相同或相似的控件和事件时
用法
其实也很简单,如下:Private Sub option1_Click(Index As Integer)select case index case 0'如果单击的是option1(0)所响应的事件 'case 1'如果单击的是option1(1)所响应的事件 'end select end sub ...
关于
vb中
动态建立
控件数组
的疑问
答:
要
使用控件数组
,设计时必须建立一个控件,如 设计时建立一个文本框,名称为 Text1 ,设置 Index 属性( 0 到 32767 之间的任意整数)控件数组的下标可以不连续,用到哪个就添加哪个 如果运行时只需要建立一个 Text1(10) ,用代码 Load Text1(10)最好再设置 Visible 属性(默认为 False )和位置 ...
vb
建立一个label的
控件数组
点击label(1) 得到一个结果 点击label(2...
答:
建立一个Label()
数组
,比如是Label1()吧,在程序上建立一个Label1然后把它复制再粘贴就会提示是否建立数组,就点是,我建立了一个Label1数组,该数组中包含3个Label
控件
,按你说的代码是这样写的 第一种 用 Select Case 代码如下 Private Sub Label1_Click(Index As Integer)Select Case Index C...
在
VB中
如何选择一个
控件数组
答:
使用
for each ... next语句,例如:在一个窗体建立一个Text1()文本框
数组
,设置一些不连续的Index,放置一个Text2文本框(设置多行,滚动条),复制一下代码,运行后,所有Text1的文本内容就会全部复制到Text2中 Option Explicit Dim i As Object Private Sub Form_Load()For Each i In Text1 Te...
怎样在
VB中
添加
控件数组
答:
两个问题一起回答。你先按正常
方法
添加一个Command1,也按平时的
方式
,设置你需要的所有属性,这时,再选定按钮,复制,粘贴,询问你是否添加
控件数组
,点是,于是,和你刚才的按钮属性完全一样的控件数组就产生了。不停的粘贴,就会有一大组控件数组了。
如何用
vb
option
控件数组
编写各种字体之间变换的程序
答:
1 创建option
控件
2 复制并粘贴这个option控件,提示创建
数组
选是,再重复一次 3 修改option的caption属性,比如,option1(0)的caption改为宋体,option1(1)的caption改为隶书,option1(2)的caption改为黑体,并修改option1(0)的value属性为true 4 添加文本框text1 5 加入代码 Private Sub Option1_...
VB
控件数组
答:
Set Goods(i) = Controls.Add("
vb
.image", "MyImage" & i, Me)With Goods(i).Height = 280 .Width = 160 .Top = 10 .Left = i * (.Width + 10) + 10 .Stretch = True .Picture = LoadPicture(App.Path & "\Vehicle\坦克" & i + 1 & ".gif").Visible = True End With ...
<涓婁竴椤
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜
控件数组具有相同的
控件数组的index
控件数组的index为0
menu控件数组元素必须有索引
控件数组是什么
vbpicturebox控件
数组 vb
vb 二维数组
vb给二维数组赋值