1樓:互相學習中
使用一個輸入框的話就需要確定3個數字的分隔符,然後用split函式把inputbox的字串回拆開。
如果使用三個答字串可以這樣寫:
dim a, b, c, d, e as singlea = val(inputbox("請輸入第一個數字"))b = val(inputbox("請輸入第二個數字"))c = val(inputbox("請輸入第三個數字"))d = a + b + c
e = d / 3
msgbox "和值:" & d & " " & "平均值:" & e
vb 編寫程式 輸入3個數 求和和平均數
2樓:匿名使用者
已經通來
過除錯自,絕對能用!bai
private sub form_click()dim sum(3)
for i = 1 to 3
sum(i) = val(inputbox("請輸入第" & i & "個數
du"))
print sum(i)
n = n + sum(i)
next
print "和為:zhi
dao" & n
print "平均值為:" & n / 3end sub
3樓:匿名使用者
private sub form_click()a = val(inputbox("輸入第抄一個數", "第一個數
"))b = val(inputbox("輸入第二個數", "第一個數"))
c = val(inputbox("輸入第三個數", "第一個數"))
print "三個數的和是:" & a + b + cprint "三個數的平均數是:" & (a + b + c) / 3
end sub
VB題,窗體中有命令按鈕,編寫如下程式求過程,謝
請按以下步驟操作 1.開啟vb新建一個工程,儲存好 2.窗體上畫一個一個命令按鈕command1 命令按鈕標題 隱藏 一個標籤label1,標籤最好打幾個字 3.雙擊命令按鈕進入 編輯器 1.寫如下 ifcommand1.caption 隱藏 then label1.visible false co...
編寫程式在窗體上輸出,編寫程式,在窗體上輸出3 100之間的所有素數,要求每行顯示4個數!
判斷一個整數是否為素數的通用過程 dim i as integer prime true for i 2 to sqr n if n mod i 0 then prime false exit for end ifnext i100以內的素數 for i 100 to 2 step 1 if pri...
用VB編寫程式利用計時器計時,在窗體上新增命令按鈕,標籤,計時器控制元件,注意 在Timer的事
介面你自己設計 我幫你寫 等一下附上來 dim s as integer private sub command1 click 開始按鈕timer1.interval 1000timer1.enabled trueend sub private sub command2 click 停止按鈕time...