1樓:匿名使用者
' 這裡我假設為3個text來進行輸入3個數值來比較,還有乙個text來進行輸出結果
a=val(text1.text)
b=val(text2.text)
c=val(text3.text) : d=0if a < b then
d=aa=b
b=dend if
if a < c then
d=aa=c
c=dend if
text4.caption = "結果:" & a
這個vb程式求三個數中最大值有什麼問題?
2樓:匿名使用者
先設定某個值為最大,然後和其它的兩個比較一下,就得出結果了。
**如下:
'假設三個數分別是x,y,z
dim maxium as integer '定義變數maxium =x '先設定某個值
if y>maxium then maxium=y '如果y比它大,變數改為y
if z>maxium then maxium=z '如果z比它大,變數改為z
print "最大值:" & maxium
3樓:
dim max as integer = a '假設 a 是最大 (它也是已知最大的數)
if b > max then max = b '如果b 比 max(已知最大的數) 大,更新max
if c > max then max = c '同上賦值是右向左。
每次都和已知最大的比,比已知最大的大,更新已知最大的數值。
vb程式設計題,輸入3個數,然後輸出其中的最大數
4樓:匿名使用者
private sub command1_click()if val(text1)>val(text2) then max=val(text1)
if val(text3)>max then max=val(text3)
text4=max
end sub
按下按鈕,比較3個文字框中數字大小版輸出權到文字框4
vb 編寫乙個具有可選引數的函式過程,既可以求兩個數的最大值,也可以求三個數的最大值,
5樓:網海1書生
function max(n1, n2, optional n3 = empty)
max = iif(val(n1) > val(n2), val(n1), val(n2))
if not isempty(n3) then max = iif(val(n3) > max, val(n3), max)
end function
private sub command1_click()
print "23.567與76.3的最大值是" & max(23.567, 76.3)
print "1895、568與9816的最大值是" & max(1895, 568, 9816)
end sub
vb程式設計題:任意輸入三個數,找出其中最大數?
vb程式設計題:定義並呼叫函式,求任意三個整數中的最大值
6樓:匿名使用者
int a,b,c,d,e;d=math.max(a,b);e=math.max(d,e)比較的是abc中的最大值e為abc中的最大值
使用vb**求輸入的三個數字中最大的數字?
求質因子數,求質因子數 Vb
option explicit private sub command1 click dim n as long n val text1 text2 fenjie n end sub private function fenjie n as long as string dim t as strin...
二分法找數vb求指明哪錯了
修改 if a mid find then 為 if cint a mid cint find then 修改 elseif a mid find then 為 elseif cint a mid cint find then 修改最後一句為 if not flag then picture1.pr...
對於任意大於1的自然數n證明
用數學歸納法,n 2,成立。假設n k時命題成立 1 1 3 1 1 5 1 1 2k 1 根號 2k 1 2 只需證 1 1 2k 1 根號 2k 1 2 根號 2k 3 2即可 即證 2k 3 2k 1 根號 2k 3 根號 2k 1 因為大於1的數開根號後比原來小,故 2k 3 2k 1 根號...
求VB大神幫忙寫下這題的VB程式
private sub command1 click dim i as integer,j as integerfor i 1 to 9 step 2print spc 2 i for j 10 i to 1 step 1print next print spc 4 for j 1 to i pri...
c語言將十進位制整數化成任意進製的數
只要在想這樣就可以pringtf o 某字 o是代表八進位制x為十六進製制 將任意進製的整數化成十進位制整數 一 目的和要求 1 應用迴圈進行冪運算。2 掌握其它進製的數化成十進位制數的計算方法。3 轉換的結果正確。二 實驗內容 1 鍵盤上任意輸入乙個任意進製的整數及它的進製。2 根據其它進製的數化...