怎么得到第二个Form里的参数

如何得到第二个Form里的参数
条件，有两个Form_A Form_B
form_A的代码
  Dim myForm As Form_B = New Form_B
  myForm.ShowDialog(Me)

  得到Form_B关闭后，Form_B里面的id这个数值的代码怎么写


Form_B的代码
  。。。
  public id as integer
  Private Sub Form_B_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  id=111
  End Sub

[解决办法]
一:在Form_A中引用Form_B
Imports forms.Form2
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
debug.print(Form2.id)
End Sub

二：定义公共变量放在单独模块里
 public id as integer
[解决办法]
定義一個模塊級的公共變量id即可，如 Public id as integer