条件文 If文ElseIf Case文 Visual Basic VB.NET入門
If
もし～なら条件分岐
特定の値をチェックしたりする時に使います。
If TextBox1.Text = “” Then
/テキストボックスが空なら。条件が真なら。
Else
/それ以外文字が入力されていたら。 条件が偽なら。
End If
サンプルソース
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If TextBox1.Text = “” Then
MsgBox(“文字が入力されていません”)
Else
End If
End Sub
End Class
ElseIf
それ以外で条件を付けたいときはElseIfを使います。
If TextBox1.Text = “” Then
/テキストボックスが空なら。条件が真なら。
Else
/それ以外文字が入力されていたら。 条件が偽なら。
End If
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If TextBox1.Text = “” Then
MsgBox(“文字が入力されていません”)
ElseIf TextBox1.Text = “1” Then
MsgBox(“1”)
Else
End If
End Sub
End Class
Select Case
一つのモノに対して複数条件式をつける時に使います。
Select Case TextBox2.Text
Case “1”
/TextBox2が1なら
Case “2”
/TextBox2が2なら
Case Else
/TextBox2が1と2以外なら
End Select
サンプルソース
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Select Case TextBox2.Text
Case “1”
‘TextBox2が1なら
MsgBox(“1”)
Case “2”
‘TextBox2が2なら
MsgBox(“2”)
Case Else
‘TextBox2が1と2以外なら
MsgBox(“1と2以外です”)
End Select
End Sub
End Class