放分求助 `~~~~~~~~~~~~~在线等

[simonlee2003]

我想在第2个form中修改第1个form中command的caption ,第一个form中command 有很多 怎么才能做到一一对应的修改？
请各路英雄指教~~~！！！！！！

[flyingscv]

form1.command1(val(text1.text)).caption=text2.text

[kimurakenshin]

对一个控件使用Ctrl+C然后用:Ctrl+V,会给你提示是否建立控件数组,选择是.

[lb0lblb]

用控件数组

[simonlee2003]

怎么使用呢？小弟是刚学不久。

[lb0lblb]

如果只改其中一部分，直接用
form1.commandName1.captain=.......
form1.commandName2.captain=.......
.......

[emosen999]

同上
form1.command1.caption=.......
form1.command2.caption=.......

[SoHo_Andy]

测试通过
form1中放两个CommandBttuon 按钮
在command1中 form2.show即可

form2中代码
Private Sub Form_Load()
Dim bb As Control
For Each bb In Form1.Controls
If TypeName(bb) = "CommandButton" Then
If bb.Caption = "Command2" Then
bb.Caption = "呵呵"
End If
End If
Next
End Sub

[lb0lblb]

控件数组用在控件属性改变有规律的情况下

[3661512]

参考
举例说明VB中控件数组的使用方法
http://www.sijiqing.com/vbgood/experience/index.asp?action=read&id=3629
以及
快速更改组控件属性
http://www.sijiqing.com/vbgood/experience/index.asp?action=read&id=3048

[simonlee2003]

我想在form2中用2个text 一个用来定位commandID， 另一个修改他的caption 。（就是说让text1.text=form1.command(text1.text)

[SoHo_Andy]

我的可以啊，你小小改动就好啦