在select case 語句中可以使用關(guān)系運(yùn)算符大于>小于<等于=等關(guān)系運(yùn)算符，需要用關(guān)鍵字IS和TO。
用個(gè)例子來說明：
Private Sub Command1_Click()
Dim age As Integer
age = Text1.Text
Select Case age
Case Is < 14（如果age小于14時(shí)）
Label1.Caption = "小朋友，你好！"
Case 14 To 23（如果age在14到23時(shí)）
Label1.Caption = "學(xué)生朋友，認(rèn)真讀書吧。"
Case 24 （如果age是24時(shí)）
Label1.Caption = "你和我是同齡人"
Case Is > 100 （如果age大于100時(shí)）
Label1.Caption = "你真是個(gè)老不死！"
Case Else （如果age不滿足以上所有值的范圍時(shí)）
Label1.Caption = "按道理我要尊重你。"
End Select End Sub

轉(zhuǎn)載于:https://www.cnblogs.com/gyc19920704/p/5421105.html

總結(jié)

以上是生活随笔為你收集整理的select case语句 is和to用法的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。