1樓：匿名使用者
剛剛給你發過去了，最簡單的那種賣菜用的計算器了。請你查收！
2樓：匿名使用者
dim a as double
dim b as integer
private sub command1_click()
'清除按鈕**
text1.text = ""
end sub
private sub command10_click()
'1按鈕**
text1.text = text1.text + "1"
end sub
private sub command11_click()
rem 0按鈕**
text1.text = text1.text + "0"
end sub
private sub command12_click()
rem .按鈕**
text1.text = text1.text + "."
end sub
private sub command13_click()
'+按鈕**
a = val(text1.text)
text1.text = ""
b = 1
end sub
private sub command14_click()
'-按鈕**
a = val(text1.text)
text1.text = ""
b = 2
end sub
private sub command15_click()
'*按鈕**
a = val(text1.text)
text1.text = ""
b = 3
end sub
private sub command16_click()
'/按鈕**
a = val(text1.text)
text1.text = ""
b = 4
end sub
private sub command17_click()
'=按鈕**
rem 判斷操作符號，並給出相應的計算公式
select case b
case 1
text1.text = str(a + val(text1.text))
case 2
text1.text = str(a - val(text1.text))
case 3
text1.text = str(a * val(text1.text))
case 4
'錯誤處理程式
if val(text1.text) = 0 then
text1.text = "注意除數不能為0!"
else
text1.text = str(a / val(text1.text))
end if
case else
text1.text = ""
end select
end sub
private sub command2_click()
'9按鈕**
text1.text = text1.text + "9"
end sub
private sub command3_click()
'8按鈕**
text1.text = text1.text + "8"
end sub
private sub command4_click()
'7按鈕**
text1.text = text1.text + "7"
end sub
private sub command5_click()
'6按鈕**
text1.text = text1.text + "6"
end sub
private sub command6_click()
'5按鈕**
text1.text = text1.text + "5"
end sub
private sub command7_click()
'4按鈕**
text1.text = text1.text + "4"
end sub
private sub command8_click()
'3按鈕**
text1.text = text1.text + "3"
end sub
private sub command9_click()
'2按鈕**
text1.text = text1.text + "2"
end sub
誰幫我計算下變壓器的使用壽命,誰幫我計算下變壓器的使用壽命
工頻變壓器很來多可以用源50年。開關電源變壓器牽涉的原件bai很多，經過最薄弱du環節的原件失效率zhi推算整體可用年dao限，這又和原件的工作溫度等等若干因素有關。您可以參閱國家標準對照其他電子產品的條目分析計算。很有經驗的人做這類計算也要很長時間。供參考。擬定每個原件的平均壽命20000小時。分...
誰教我破開機密碼100分
拆開機子，把鈕釦電池取下來，用金屬接觸兩個觸片一下，然後在把電池安上去 如果他鎖的是bios密碼，那麼比較麻煩 要開啟機箱，找到鈕釦電池，取下來，等5 9分鐘再把電池接回去，開機就可以了。如果他把xp的使用者名稱的密碼鎖起來了，用erd commander 2005強制修復系統破密碼。關於鎖。我想沒...
幫我答小學數學考試卷（100分）
有一定可信度，當醫生的？你這很多題不完整啊,做不了 一.認真填寫 27 1.寫成乘法算式是 它表示 式子呢？2.三個連續奇數的和是x，那麼這三個奇數從小到大分別是 x 3 2 x 3 x 3 2 3.當x 3時，2x2 x 1 22 2 方程 x 12 27的解是 15 4.一個長方體鐵塊長20分米...