1樓：匿名使用者
dim i as integer
dim k as integer
dim s as double
s = 1
k = val(text1.text)
for i = 1 to k
s = s * i
next
labe12,caption = k&"!
復="&s（就是這一行）制
、labe12,caption ","改為bai 「.」 就ok了！！寫**du時zhi應該注意細節！dao！！
vb提示「缺少：語句結束」
2樓：遠航
正確語句du如下：
private sub command1_click()dim scoore as integer, temp as string
scoore = val(text1.text)temp = "成績等級為:"
select case scoore
case 0 to 59
label2.caption = temp + "不及格zhi"
case 50 to 69
label2.caption = temp + "及格"
case 80 to 100
label2.caption = temp + "優良"
case else
label2.caption = "成績出錯!"
end select
end sub
樓上的別dao管成績衝突
不衝回突，就是衝突語答只是執行的結果正確與否問題，不會影響語法的。
3樓：匿名使用者
「label 2」 是幹什麼的？
另外，0 to 59 和50 to 69有衝突啊，這種case語句應該不允許衝突才對。
4樓：匿名使用者
應該是 label2.caption 吧，你寫成了 label 2 caption
其他的都類似
vb中arr是什麼意思vb中是什麼意思
vb裡的arr函式是陣列。舉例說明如下 private sub mand1 click dim arr 5 as integer,arr1 5 as integer 宣告兩個一維數字 n 3 賦值 for i 1 to 5 迴圈開始 從1迴圈到5arr i i 陣列元素賦值 arr1 n 2 n i...
vb中的EoF是什麼意思，vb中 是什麼意思
eof為end of file的縮寫，在作業系統中表示資料源無更多的資料可讀取。do while not eof 1 解釋 判斷當eof 1 的值為true時停止do迴圈。使用eof是為了避免因試圖在檔案結尾處進行輸入而產生的錯誤。直到到達檔案的結尾，eof函式都返回false。對於為訪問rando...
vb 中 select case 是什麼意思
是一種條件語句，類似if語句 例如 select case x case x mod2 0 msgbox 偶數 case else msgbox 奇數 end select 上面一個一句就是判斷x是奇偶數的問題 根據表示式的值執行幾組語句之一 select case a 意思就是判斷a是什麼內容。然...