zono note

zono note

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

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

前回に引き続き、今回は

A子さんとB子さんの条件分岐入力です

A子さんの場合

Private Sub CommandButton2_Click()

If (a > 80 And b > 180 And c > 1000) Then
MsgBox "OKです!"
Else
MsgBox "次に方へ"
End If

End Sub


B子さんの場合

Private Sub CommandButton3_Click()

If (a > 80 Or b > 180 Or c > 1000) Then
MsgBox "OKです!"
Else
MsgBox "次に方へ"
End If

End Sub

f:id:zonozonox:20180205060942j:plain
次回で最終掲載です!