Usar el select case en visual 2010

hola experto

Buen día de antemano recibe mi agradecimiento por las respuestas dadas

como usaría el select case en estas condiciones

If CheckBox1.Checked = True Then
If NumericUpDown1.Value < Val(TextBox1.Text) Then
MsgBox("falta dinero")
Else
MsgBox("efectivo efectuado")
End If
ElseIf CheckBox2.Checked = True Then
If NumericUpDown2.Value > Val(TextBox1.Text) Then
MsgBox("El Monto No coincide con el valor total")
ElseIf NumericUpDown2.Value < Val(TextBox1.Text) Then
MsgBox("El valor ingresado es menor")
ElseIf ComboBox1.Text = "--Seleccione Tarjeta--" Then
MsgBox("seleccione una tarjeta")
Else
MsgBox("tarjeta efectuado")
End If
ElseIf CheckBox3.Checked = True Then
If Val(TextBox4.Text) < Val(TextBox1.Text) Then
MsgBox("Monto ingresado en dolares bajo")
Else
MsgBox("operacion en dolares efectuado")
End If
End If

mejor dicho ya no deseo usar los if... Then