在线等，问题解决立即给分

[vomo]

我建立了一工程，在里面有两个窗口，这俩个窗口是平等的，窗口1中有一个ComboBox控件，这个控件的list中有4个值，我想在
窗口2中应用这4个值怎么做？希望各位给个代码，谢谢

[vomo]

顶，急着等

[z285246409]

FORM1 CODE

Private Sub Form_Load()
Combo1.AddItem "第1个值", 0
Combo1.AddItem "第2个值", 1
Combo1.AddItem "第3个值", 2
Combo1.AddItem "第4个值", 3
Form2.Show

End Sub

FORM2 CODE

Private Sub Form_Load()
Text1.Text = Form1.Combo1.List(0)
Text2.Text = Form1.Combo1.List(1)
Text3.Text = Form1.Combo1.List(2)
Text4.Text = Form1.Combo1.List(3)
End Sub

[我是一道光_]

lz 你的问题描述不是很清楚的哈~

2楼的可行

[hongxuemin5741822]

Combo1.AddItem combo2.list(0) '将combo2中的内容添加到conbo1中
Combo1.AddItem combo2.list(1)
Combo1.AddItem combo2.list(2)
Combo1.AddItem combo2.list(3)

[熊孩子开学喽]

引用其他窗体的对象:
在FORM1引用FORM2的对象OBJ1

FORM1中代码:
FORM2.BOJ1.XXX

反之,在FORM2中引用FORM1中的对象OBJ2
FORM2中代码:
FORM1.OBJ2.XXX

[mybelta2]

Form2.Text1.Text = Form1.Combo1.List(0)
Form2.Text2.Text = Form1.Combo1.List(1)
Form2.Text3.Text = Form1.Combo1.List(2)
Form2.Text4.Text = Form1.Combo1.List(3)

[ArmStronger]

二楼的可以实现

[dolphin1987]

同意二楼的