VB1设计一个由输入身高计算标准体重的程序。计算公式为：男：标准体重（kg）=身高（cm）-100；

MDIForm1代码截图传不上了，只好粘贴了：

Private Sub MDIForm_Load()

  Me.Height = 6000

  Me.Width = 9000

End Sub

Private Sub No_2_Click()

  Load Form2

  Form2.Show

End Sub

Private Sub No_3_Click()

  Load Form3

  Form3.Show

End Sub

Private Sub No_4_Click()

  Load Form4

  Form4.Show

End Sub

Private Sub Quit_Click()

  End

End Sub