1樓：匿名使用者
**如下：
private sub text1_change()if isnumeric(text1) = false then exit sub '不是數字結束
select case val(text1)case is < 0 '小於零，不處理
case is = 0 '等於零
text3 = text1
case is < 20 '大於零，小於20text4 = text1
case is >= 150 '大於等於150，不處理case is > 30 '大於30小於150text2 = text1
end select
end sub
2樓：匿名使用者
option explicit
dim sj as long
private sub psj()
if sj > 30 and sj < 150 thentext2 = sj
elseif sj > 0 and sj < 20 thentext4 = sj
elseif sj = 0 then
text3 = sj
end if
end sub
private sub command1_click()sj = val(text1)
psjend sub
塊if判式中缺了20-30間的值歸屬哪兒。
在Labview中,如何將接收到的資料存入陣列或者儲存起來
小丁創業 方法和詳細的操作步驟如下 1 第一步，開啟前面板，從控制面板中選擇 陣列矩陣 庫中的 陣列 選項，然後將其放置在前面板上，見下圖，轉到下面的步驟。2 第二步，執行完上面的操作之後，開啟後面板並找到相應的陣列，然後在右鍵選單中單擊 屬性 選項，見下圖，轉到下面的步驟。3 第三步，執行完上面的...
vb中如何把在text1中輸入的資料，從列表框list1中刪除
private sub command1 click for i list1.listcount 1 to 0 step 1 if list1.list i text1.text then list1.removeitem i next end sub 我叫明輝 private sub comman...
vb中的資料型別
候鳥飛 vb的基本資料型別 字元型資料 數值型資料 貨幣型別 位元組型別 布林型別 日期型別 通用型別 無符號型別 物件型別等。1 字元型資料 字元型資料用以定義一個字元序列，在記憶體中一個字元用一個位元組來存放，用字母c表示，它的字元個數範圍是0 254個字元。2 數值型資料 數值型資料包括 整型...