1樓：
private sub command1_click（）dim score as integer
score=int(val(text1.text)*0.15+val(text2.text)*0.25+val(text1.text)*0.6+0.5)
text4.text=score
end sub
關於您的提問補充的回答： **很顯然就是我寫的這個 如果按照你圖上給的資料來算最後結果是93 而非你圖上的91 你可以用計算器驗證下
2樓：王笑
一段**如下：
score=int(val(text1)*0.15+val(text2)*0.25+val(text1)*0.6+0.5);
text4=score;
end sub
3樓：匿名使用者
text4=int(text1*0.15+text2*0.25+text3*0.6+0.5)
用+0.5取整數來四捨五入，用round函式的話是「四捨六入五留雙」
"程式執行不正確"是什麼意思，如果是計算結果不對那就是你公式的問題，自己用計算器算一下就知道了
如何編寫乙個 能夠傳送檔案 的 VB程式
看我p控制項集版本3那貼。急 如何用vb實現區域網內傳送檔案 100 如何用vb編寫乙個向指定視窗傳送鍵盤命令的程式？vb實現服務端傳輸單個小檔案給多個客戶端 是什麼環境？網際網路還是區域網？如果是區域網，伺服器端直接udp廣播一下就完了。vb的winsock如何實現多次傳輸與接收 vb的winso...
VB編寫過程，VB 編寫乙個過程
private sub form click print s 25,10 print s 25,50 print s 25,100 這兩行已經超出vb的計算能力了 print s 25,200 vb只能處理32位的數值end sub function s x,n for k 1 to n t 1 f...
編寫程式輸入正整數n,計算1,編寫乙個程式輸入乙個正整數n,計算123354759,求前n項和
n和2n 1，遍歷，即可解決。include void main printf 4f n sum 怎麼用c語言編寫程式 輸入乙個正整數n，計算1 2 3 3 5 4 7 5 9 include int main void printf sum lf n sum return 0 試著執行吧，我沒上機...