前回の記事では、判定文のIf文を取り上げました。
https://qiita.com/HiHiroyoshi/items/d8e82fb303da6861169d

今回の記事では、Select文を取り上げたいと思います。
（SQLのSELECT文とは、混同しないように気を付けましょう。）

前回のIf文では、ネスト（入れ子）にしていくと、 プログラムのコード が読みにくくなるといったことを指摘しました。

今回のSelect文では、場合分けがキーワードです。

例えばある変数group(分類)を例に考えます。
このgroupはString型（文字列）で、A,B,C,D,Eの5種類のデータが記載されているとします。

分類	値
A	1
B	2
C	3
D	2
E	5

分類ごとに、上記の値をscoreに入れるプログラムを作成してみましょう。まずは、If文を例に出します。

Dim group As String = "A"

Dim score As Integer

If group = "A" Then
    score = 1
ElseIf group = "B" Then
    score = 2
ElseIf group = "C" Then
    score = 3
ElseIf group = "D" Then
    score = 2
ElseIf group = "E" Then
    score = 5

End If

こういった形です。
これと同じ動作をSelect文を利用して書いてみます。

Dim group As String = "A"

Dim score As Integer

Select Case group
    Case "A"
        score = 1
    Case "B", "D"
        score = 2
    Case "C"
        score = 3
    Case "E"
        score = 5

End Select

こういったプログラムのコードになります。
読みやすい（可読性が高い） ですよね！
また、BとDの場合は、同様の値を入れるため、
カンマ区切りでつなげることも可能です。

まとめ

場合分けの場合は、Select文にできないか検討してみましょう。