Ответ 1
используйте case Else
, он такой же, как и по умолчанию c
Синтаксис:
Select [ Case ] testexpression
[ Case expressionlist
[ statements ] ]
[ Case Else
[ elsestatements ] ]
End Select
например.
creamcake = TextBox1.Text
Select Case creamcake
Case "Eaten"
DietState = "Diet Ruined"
Case "Not Eaten"
DietState = "Diet Not Ruined"
Case Else
DietState = "Didn't check"
End Select
если вы хотите назначить более одного случая затем пример
Select Case agerange
Case 16 To 21
MsgBox "Still Young"
Case 50 To 64
MsgBox "Start Lying"
End Select