zono note

zono note

日々の学び、気付きを大切に綴りたい

連載2: 三高評価を VBAで作成します

ユーザーフォームの作成は抜粋します。
(作り方は、BMI値の算出を参照して下さい)

最初に、三高の基準となる設定をします


'変数宣言

Dim atai1 As Integer
Dim atai2 As Integer
Dim atai3 As Integer


'入力
atai1 = a.Value
atai2 = b.Value
atai3 = c.Value

'条件処理

If a > 80 Then
MsgBox "よく出来ました"
Else
MsgBox "偏差値は普通です"
End If

If b > 180 Then
MsgBox "背高いですね"
Else
MsgBox "身長は普通です"
End If

If c > 1000 Then
MsgBox "高収入ですね"
Else
MsgBox "収入は普通です"
End If


End Sub

f:id:zonozonox:20180205060131j:plain