| ★If...Then...Else 基本形 Part3 | |||
◎条件がAの場合はAAの処理を、条件がBの場合はBBの処理を、条件がCの場合はCCの処理をしなさい。 |
|||
If 条件式 Then 条件式が正しければ、このステートメントAを実行します。 Else 条件式が正しくなければ、このステートメントBを実行します End If |
|||
| 例） 結婚をしている場合は、チェックボックスにチェックマークを入れてメッセージボックスに”手を出すと不倫だぞ！”ってメッセージを入れるけど、未婚なら”この子は大丈夫！”ってメッセージを入れる。 さてさていよいよ意味不明なフォームになってきましたが、先ほどのコマンドボタンを加工して作ってみましょう。 直すところはプロシージャーの記述だけです。次のようにしますよ。 |
|||
| Private Sub
CommandButton1_Click() If CheckBox1 = True Then MsgBox "手を出すと不倫だぞ!" Else Msgbox"この子は大丈夫！" End If End Sub |
|||
これで出来上がりです。  |
|||
|
|||