リスト2:初期化処理


Private Sub Initialize()
  txtNumber.Text = "0"
  sglNumber1 = 0
  sglNumber2 = 0
  sglAnswer = 0
  IsCamma = False
  intOperator = 0
End Sub


本文へ戻る