1樓:網友
你的思路是對的,但有兩個錯誤:1、x是誰?應該在dim x%下一行新增x=;否則無論輸什麼x都=0;2、vb中不認識a<=x<=b,應寫成a<=x and x<=b;建議用select case也編一下,這簡單些但易錯!
2樓:常山子珩
private sub command1_click()dim x
if not isnumeric(cint(text1)) thentext2 = 輸入出錯!"
exit sub
end if
x=cint(text1)
if x<0 or x>100 then
text2 = 輸入出錯!"
exit sub
end if
if 100 >=x >=90 then
text2 = 優"
elseif 90 > x >=80 then text2 = 良"
elseif 80 > x >=70 then text2 = 中"
elseif 70 > x >=60 then text2 = 及格"
elseif 0 <=x < 60 thentext2 = 不及格"
end if
end sub
vb程式設計-成績判斷
3樓:網友
private sub command1_click()select case
case is < 60
不及格"case is <= 75
及格"case is <= 85
良好"case is <= 100
優秀"case else
輸入成績錯誤"
end select
end sub
vb中,關於考核成績的程式設計。
4樓:網友
呼叫乙個分數的計算函式。
比如說:sub mark()
n = n + 1
select case n
case 1: sum = sum + 15case 2: sum = sum + 17case 3:
sum = sum + 17case 4: sum = sum + 17case 5: sum = sum + 17case 6:
sum = sum + 17end select
end sub
5樓:網友
頭大。學生黨傷不起啊。
《學生成績管理系統》vb程式設計
6樓:網友
可以用sql的話我能幫你做個~
不過不免費。
7樓:百小度
畢業設計?用這個也太簡單了吧。
vb 成績分類程式設計
8樓:網友
同學的成績為:分;良好。
如何提高vb程式設計水平
9樓:懂就答不懂就問
逼自己看例項、看**,一行一行的看,有任何一行不懂就想辦法搞懂!
10樓:絕世大茬
加一些群,多和人家交流,看一些例項。
11樓:自私式愛你
多寫**。
多理解別人的**。
VB程式設計,vb程式設計是什麼?
51 len函式,檢測字元成的長度。right函式,從右邊在指定的字串中擷取一定數量的字元組成新的字串。52 dim a 9 as nteger 惠用紅色標註這一行,不能執行。以下省略。vb程式設計是什麼?1 vb程式設計以visual basic 6.0簡體中文版為語言背景,深入淺出的介紹visu...
vb程式設計問題,VB程式設計問題
設 text1 text2 text3 text4 command1 label1 4個test輸入資料 command1是按鈕 label1顯示內容 我給你寫一個子程式 其它你在工具欄向視窗託就行了,然後把這個子程式複製到 做就ok了 private command1 click dim maxa...
vb程式設計是什麼什麼是VB程式設計?
1 vb程式設計以visual basic 6.0簡體中文版為語言背景,深入淺出的介紹visual basic 6.0程式設計技術,基本涵蓋了visual basic 6.0程式設計時的常用內容。2 vb程式設計共分14章,主要內容包括開發環境 語言基礎和陣列與過程 常用控制元件 選單設計 檔案處理...