リスト1:グローバル変数の宣言


Public sglResult As Single   ' 計算結果(外部通信用)
Dim sglNumber1 As Single   ' 最初の置数
Dim sglNumber2 As Single   ' 2番目の置数
Dim sglAnswer As Single   ' 計算結果(内部処理用)
Dim IsCamma As Boolean   ' 小数点の有無を示すフラグ
Dim intOperator As Integer   ' 演算子 -- 0:+, 1:-, 2:*, 3:/


本文へ戻る