一个简单的问题，很容易得分

Question

我做这样一件事，想让用户选择一个下拉条，默认为“否”，如果用户选择下拉条的“是”，则跳出一个新窗口，上一个窗口传递一个id值给新窗口，让用户添入一些数据，然后用户选择保存的话，就可以保存id值和添入的数据，并且返回第一个窗口。
请帮我看看，代码应该怎样写，分不多，全给了！

Answer 1

if combo1.text = "yes" then
  form2.setID(idvalue)
  form2.show vbmodal
  if form2.choose = "ok" then
    ...
  else
    ...
  endif
endif

Answer 2

''form1:
Public id As IntegerPrivate Sub Combo1_Click()
    If Combo1.Text = "是" Then
        Form2.Show
    End If
End SubPrivate Sub Form_Load()
    Combo1.AddItem "否"
    Combo1.AddItem "是"
    Combo1.Text = "否"
    
    Me.AutoRedraw = True
    Me.Print CStr(id)
End Sub
=====================================
''form2:
Private Sub Command1_Click()
    If MsgBox("是否保存数据？", vbOKCancel) = vbOK Then
        Form1.Combo1.AddItem "aa"
        Form1.id = 100
    End If
    Form1.Print CStr(Form1.id)
    Unload Me
End Sub