1樓：
設text1和text2分別為x和y的輸入框，text3輸出結果，另有***mand1是計算按鈕。
在窗體代版碼「通權用」段編寫函式過程：
private function f(byval x as double, byval y as double) as double
select case x
case is > 0
if y > 0 then
f = log(x) + log(y)
else
f = sin(x) + sin(y)
end if
case else
f = sin(x) + cos(y)
end select
end function
'計算按鈕事件呼叫f：
private sub ***mand1_click()text3.text = f(val(text1.text), val(text2.text))
end sub
2樓：匿名使用者
有圖有真相，望採納。。。。
用vb編寫程式,計算
option explicitdim k,t as singleprivate sub mand1 click for k 2 to 300 step 2t t 1 k next label1.caption t end sub for i 2 to 300 step 2 sum 1 i sum n...
vb 編寫程式解決百錢買百雞問題
private sub command1 click dim cock,hen,chicken,sum as integer for cock 0 to 19 for hen 0 to 33 chicken 100 cock henif not c mod 3 thensum cock 5 3 he...
前題使用c運用switch語句編寫程式,按照考試成績的
include void main char x std cout 請輸入等級標識 x switch x case a std cout 90 e之間的大寫字母 你 你是在vs寫c 嗎？不是也不要緊，主函式都一樣，我這是在vs上寫的，加多了幾個標頭檔案 include using namespace...