1樓：四捨**入
舉例如下：
private sub form_click()dim a as integer
a = inputbox("請輸入乙個數：")select case a
case is > 0
msgbox "是正數"
case is < 0
msgbox "是負數"
case else
msgbox "是零"
end select
end sub
2樓：匿名使用者
比如在乙個文字框裡輸人乙個分數，按一下按鈕，根據分數判斷出級別，**如下：
private sub command1_click()select case val(text1.text)case 0 to 59
msgbox ("不及格")
case 60 to 79
msgbox ("及格")
case 80 to 89
msgbox ("良好")
case 90 to 100
msgbox ("優秀")
case else
msgbox ("輸人不正確，請重新輸人！")end select
end sub
3樓：匿名使用者
private sub form_click()dim a as integer
a = inputbox("請輸入乙個數：")select case a
case is > 0
msgbox "是正數"
case is < 0
msgbox "是負數"
case else
msgbox "是零"
end select
end sub
4樓：匿名使用者
select case a
case b to c
t=100
case 1,2,3
t=200
...case else
t=0end select
case後可以有幾種格式來寫
在vb.net中，使用select case語句，case後能接幾個判斷語句嗎？ 5
5樓：匿名使用者
select case when a>1 and b>2 and c>3 then d=1
when a>1 and b>2 and c<3 then d=2... end
至於寫多少，沒限制，，只要你語句不卡，，，
請問vb中的select case中，case+is 這其中的[is]是什麼意思呢？求指教，謝謝！
6樓：網海1書生
在select case結構中，如果要表示某個具體的數，可以這樣：
case 1
如果要表示某幾個具體的數，可以這樣：
case 1, 3, 7
如果要表示某個範圍內的數，可以這樣：
case 3 to 8 '從3到8的所有數，包含3和8但是，如果要表示的數的範圍只有下限沒有上限（比如大於3），或者反過來只有上限沒有下限（比如小於等於6），這怎麼表示呢？這時候就要用到is了：
case is > 3
case is <= 6
所以，這個is就跟上面那個to一樣，就是個命令詞而已，沒啥特殊的。如果你非要解釋，那它就是代表了這個數（即select case後面那個表示式的值）本身。
7樓：改韞潛雍
問題是你把窗體最小化後就不能用checkbox來控制讓他變回來了....(最小化你連窗體都看不到,怎麼點裡面的控制項?)
private
subcombo1_click()
ifcheck1.value
then
select
case
combo1.listindex
case
0:me.windowstate=1
'最小化
case
1:me.caption
="被我修改咯"
endselect
'select
case...end
select
語法注意!
else
'主要是這裡用select
case沒意義,最小化後你控制不了checkboxifcombo1.listindex=1
then
me.caption
="變回原樣"
endif
endsub
vb中if條件語句與select case語句的區別
if是按表示式進行判斷的，select case是按條件進行判斷的，如果你在select case裡寫表示式，那如果表示式中第一段條件是ture，就會進入運算，後半段表示式是不參與運算的 case is 1 y x case is 1 10 y 2 x 1case is 10 y 3 x 11如果你...
VB中的NOT是什麼意思，vb中的notm什麼意思？
卓縈牛叡 not，顧名思義嘛，就是非的意思。這句話的意思就相當於ifx 0 then，類似的還有or，就是或的意思，and，且的意思。 玫瑰為你盛開 not是非運算 f index not f index 這種形式的，通俗的講，就是開關 當f index 為true時，就讓它變成false當f in...
VB中label控制項的文字換行，在VB中怎麼怎麼設定label自動換行
暈，副總裁答案 不如回家 label是可以換行的，將label的autosize的屬性設定為true，然後將資料庫記錄字串str1分割為規定長度，對於label控制項是可以使用vbcrlf換行符的 如下 str1 trytrystring 這是乙個測試資料 str1是資料庫的記錄 dim block...