1樓:匿名使用者
用物件陣列要簡單多了;建議你以後在此類問題上;有多個物件陣列就用陣列!
private sub command1_click()dim max as single
max = val(text1(0).text)for i = 0 to 9
if max <= val(text1(i).text) then max = val(text1(i).text)
next
msgbox max
end sub
2樓:匿名使用者
private sub command1_click()
dim a as double
a = val(text1)
if val(text2) > a then a = val(text2)
if val(text3) > a then a = val(text3)
if val(text4) > a then a = val(text4)
if val(text5) > a then a = val(text5)
if val(text6) > a then a = val(text6)
if val(text7) > a then a = val(text7)
if val(text8) > a then a = val(text8)
if val(text9) > a then a = val(text9)
if val(text10) > a then a = val(text10)
msgbox a
end sub
用vb程式設計任意輸入數輸出其中最大值
桖卉 private sub command1 click a val inputbox 請輸入第一個數 b val inputbox 請輸入第二個數 print 你輸入的數分別是 a 和 bprint 其中較大數是 if a b then print a else print b end if e...
求a 4 a 最大值,求a 2a 4 a 最大值
令4 a t t 0 則a 4 t 原式 6 t 8 t 想要得到原式的最大值,則需要求得 t 8 t 的最小值在t大於0時,最小值為4根號2,原式最大值為6 4根號2t小於0時,最小值為負無窮,無最大值 求a 2a 4 a 最大值 解 y a 2a 4 a a 2a a 4 令dy da 1 2 ...
函式最大值最小值問題 20,求函式最大值最小值
1.函式y x 3為偶函式 根據 x 3 x 3 關於x 0對稱,當x 0時,y x 3,單調遞增,所以函式在 負無窮,0 單調遞減,當x 1,y x 3能取得最小值1 2.最大值與最小值相等,說明y f x 影象為一平行於x軸的直線 根據導數的幾何意義 函式上某點切線的斜率 可知f x 0 y f...