1樓：
vb沒有max和min函式，需要自己編寫
private sub command1_click()dim arr(1 to 100) as integerrandomize
for i = 1 to 100
arr(i) = int(rnd * 10000)print format(arr(i), "@@@@ ");
if i mod 10 = 0 then printnext
print "最大值=" & max(arr)print "最小值=" & min(arr)end sub
private function max(byref a() as integer)
max = a(lbound(a))
for i = lbound(a) to ubound(a)if max < a(i) then max = a(i)next
end function
private function min(byref a() as integer)
min = a(lbound(a))
for i = lbound(a) to ubound(a)if min > a(i) then min = a(i)next
end function
2樓：匿名使用者
功能：max返回引數包含的資料集中的最大數值，min返回引數包含的資料集中的最 小數值。函式max和min屬於統計函式。
格式：max/min（numberl，number2，……）引數：numberl，number2，……為需要求最大值或最小值或包含需要求最大值或最小值資料的引數，最多可以有30個引數。
數字、邏輯值、文字數字、空單元格、單元格和區域的引用地址、名稱和標誌都可以作為引數。
如果引數直接是數字、空單元格、邏輯值或文字數字，計算時都將被包括在內，空單元格被視為0，true的值為1，false的值為0，文字數字自動轉換為數值數字。如果引數直接是非數字文字或錯誤值，將顯示錯誤提示。如果引數是單元格或區域的引用，只有引用內容是數字的才被計算，其他值都將被忽略。
vb中怎麼用函式max和min 求出一組資料的最大值和最小值
3樓：匿名使用者
您好，vb中沒有max和min函式,不過你可以自己程式設計實現。
給你一個求隨機產生6個兩位正整數的例子：
private sub command1_click()dim a(6) as integer
for i = 1 to 6
randomize
a(i) = int(rnd * 90) + 10print a(i);
next i
max = a(1)
min = a(1)
for i = 1 to 6
if max < a(i) then max = a(i)if min > a(i) then min = a(i)next i
print "最大值為：" & max
print "最小值為：" & min
end sub
4樓：匿名使用者
vb自帶的函式中沒有你說的max和min函式。
5樓：匿名使用者
max(a, b) 換成iif(a>b,a,b)就成了
6樓：匿名使用者
b=dmax(a,a)
c=dmin(a,a)
自己錄個巨集看看就明白了
用vb編寫一個子過程或者子函式，能夠找出一個包含10個元素的整數陣列的最大值和最小值
7樓：匿名使用者
陣列為a(*)?取最大值?b = a(0)?
for i = 1 to 9?if b < a(i) then b = a(i)?next i?
b就是最大值了，最小值把上面那個小於號改成大於號就可以了
8樓：匿名使用者
public function getmaxmin(ary() as integer,minflag as boolean) as integer
dim temp as integer
dim i as integer
temp=ary(0)
for i=1 to ubound(ary)if minflag then
if temp>ary(i) then
temp=ary(i)
end if
else
if temp temp=ary(i) end if end if next getmaxmin=temp end function 9樓：匿名使用者 private sub form_load()dim l(9) as integer for i = 0 to 9 l(i) = i next debug.print getmaxmin(l)end sub function getmaxmin(a() as integer) as string dim x, z z = 0 x = 0 for i = lbound(a) to ubound(a)if a(i) > x then x = a(i) end if next for j = lbound(a) to ubound(a)if a(j) < z then z = a(j) end if next getmaxmin = "the max is " & x & chr(13) & "the min is " & z end function vb程式中，編寫一個求三個數中最大值max和最小值min的function過程，然後用這個過程分別
10 10樓：郝南仁 private type maxminvalmax as long min as long end type private function maxandmin(byref a() as long, l as integer) as maxminval maxandmin.max = a(0) maxandmin.min = a(0) for i = 0 to l if (a(i) > maxandmin.max) then maxandmin.max = a(i) if (a(i) < maxandmin.max) then maxandmin.max = a(i) next end function private sub command1_click()dim a(4) as long dim val as maxminval a(0) = 500 a(1) = 300 a(2) = 1000 a(3) = 2000 a(4) = 3000 val = maxandmin(a, 4)'text1.text = val.max'text2.text = val.minend sub 11樓：匿名使用者 private sub form_click()dim i as integer, n as integerdim a() as integer n = 3 redim a(n) for i = 1 to n a(i) = rnd * 100 next call sortnum(a, n) print "max:" & maxnum(a, n)print "min:" & minnum(a, n)n = 5 redim a(n) for i = 1 to n a(i) = rnd * 100 next call sortnum(a, n) print "max:" & maxnum(a, n)print "min:" & minnum(a, n)n = 7 redim a(n) for i = 1 to n a(i) = rnd * 100 next call sortnum(a, n) print "max:" & maxnum(a, n)print "min:" & minnum(a, n)end sub function maxnum(a() as integer, n) as integer dim i as integer, m as integerm = a(1) for i = 1 to n if m < a(i) then m = a(i)next maxnum = m end function function minnum(a() as integer, n) as integer dim i as integer, m as integerm = a(1) for i = 1 to n if m >a(i) then m = a(i)next minnum = m end function 用vb編寫一個求3個數中最大值max和最小值min的過程,然後用這個過程分別求3個數5個數7個數中的最大值最小值 vb程式設計 用for迴圈向一維陣列中輸入10個數,找出其中的最大值和最小值,並且交換最大值 c語言定義max_min求一個陣列最大值和最小值，利用呼叫函式void max_min(int[],int n,int *map,int *minp) 12樓： for(i=0;i<=n-1;i++); 這裡不需要分號結束，去掉即可 關於你那個max_min（）函式，你的定義實在看不明白，你保證沒有問題就好了 說下你這個流程吧 首先 int a new int 3 此時a 0 0 int max a 0 max 0 int min a 0 min 0 for int i 0 i a.length i console.writeline 請輸入第個數字 i 1 a i convert.toint32 con... min請參閱 返回一組值中的最小值。語法min number1,number2,number1,number2,是要從中找出最小值的 1 到 30 個數字引數。說明可以將引數指定為數字 空白單元格 邏輯值或數字的文字表示式。如果引數為錯誤值或不能轉換成數字的文字，將產生錯誤。如果引數是陣列或引用，則... 用max 函式即可,比如 r rand 1,10 maxr,index max r maxr 0.9649 index 10第一個返回引數是最大值,第二專 個引數是最大值所在的屬位置 下標 matlab如何找到一個陣列中的最大值以及它所在的位置 用max 函式即可,比如 r rand 1,10 ma...C輸入陣列，輸出最大值，最小值，用C 找出陣列中的最大值和最小值
在excel中，如何使用最大值和最小值函式進行運算
Matlab如何找到陣列中的最大值以及它所在的位置