Select Case-Anweisung HILFE
Verfasst: Do, 10.01.2008 16:26
Code: Alles auswählen
sub Notenwerte
Select Case iAntwort
Case "1+" "1" "1-"
sText = "sehr gut"
Case "2+" "2" "2-"
sText = "gut"
Case "3+" "3" "3-"
sText = "befriedigend"
Case "4+" "4"
sText = "ausreichend"
Case "5+" "5" "5-"
sText = "mangelhaft"
Case "6+" "6" "6-"
sText = "ungenuegend"
Case Else
sText = ""
End Select
End SubIn den Feldern steht halt 4+ 6- 1 usw....wie mach ich es jedoch das da ausreichend ungenügend sehr gut steht? Geht das mit Case Anweisung? Und wenn ja wie?
Danke