回答正确，立马结账……在线等候

Question

在Form2中可，可以使用 Form1.Combo1.xxxx进行操作的呀。

Answer 1

FORM2:
SQLSTR="INSERT INTO 表1（ID) VALUEES("TEXT1.TEXT")
CN.EXECUTE(SQLSTR)
form1.combo1.addote, text1.text

Answer 2

将FORM2模态显示即可。假设FORM1中有按钮COMMAND1，则：private sub Command1_Click()
    Form2.show vbmodal,me
    Combo1.clear'重新做你FORM_LOAD时做的事
SQLSTR=“SELECT ID FROM 表1”
SET RS=CN。EXECUTE（SQLSTR）
WHILE NOT RS.EOF 
COMBO1.ADDITEM RS!ID
WENDend sub

Answer 3

在FORM2的UNLOAD里加代码：
SQLSTR=“SELECT ID FROM 表1”
form1.combo1.removeall
SET RS=CN。EXECUTE（SQLSTR）
WHILE NOT RS.EOF 
form1.combo1.ADDITEM RS!ID
WEND

Answer 4

哈哈，这哥们要的效果是关闭FORM2时刷新COMBO，可
不是FORM2中一插值就即时更新啊。

Answer 5

SORRY,写错了一句
Private Sub Form_Unload(Cancel As Integer)
SQLSTR=“SELECT ID FROM 表1”
form1.combo1。clear
SET RS=CN.EXECUTE（SQLSTR）
WHILE NOT RS.EOF 
form1.combo1.ADDITEM RS!ID
rs.movenext
WEND
End Sub

Answer 6

可以在Form2的Unload事件里面添加代码。Private Sub Form_Unload(Cancel As Integer)
FoForm1.Combo1.xxxx = ""
End Sub

Answer 7

同意 Wts(天胜)
或者试一下
command1_click()
  form2.show 1
  combo1.clear
  SQLSTR=“SELECT ID FROM 表1”
  SET RS=CN。EXECUTE（SQLSTR）
  WHILE NOT RS.EOF 
  COMBO1.ADDITEM RS!ID
end sub