Select Case語(yǔ)句允許根據(jù)值列表測(cè)試變量的相等性。 每個(gè)值稱(chēng)為大小寫(xiě),并且為每個(gè)選擇大小檢查打開(kāi)的變量。
Select [ Case ] expression
[ Case expressionlist
[ statements ] ]
[ Case Else
[ elsestatements ] ]
End Select
expression: 是必須求值到VB.Net中的任何基本數(shù)據(jù)類(lèi)型的表達(dá)式,即布爾值,字節(jié),字符,日期,雙精度,小數(shù),整數(shù),長(zhǎng)整型,對(duì)象,SByte,短,單,字符串,UInteger, ULong和UShort。
expressionlist: 表達(dá)式子句表示表達(dá)式的匹配值的列表。用逗號(hào)分隔多個(gè)表達(dá)式子句。
statements: 語(yǔ)句如果select表達(dá)式匹配expressionlist中的任何子句,則運(yùn)行的案例。
elsestatements: 如果select表達(dá)式與任何Case語(yǔ)句的expression列表中的任何子句不匹配,則運(yùn)行Case Else后的語(yǔ)句。
Module decisions
Sub Main()
'local variable definition
Dim grade As Char
grade = "B"
Select grade
Case "A"
Console.WriteLine("Excellent!")
Case "B", "C"
Console.WriteLine("Well done")
Case "D"
Console.WriteLine("You passed")
Case "F"
Console.WriteLine("Better try again")
Case Else
Console.WriteLine("Invalid grade")
End Select
Console.WriteLine("Your grade is {0}", grade)
Console.ReadLine()
End Sub
End Module
Well done
Your grade is B
更多建議: