1樓:匿名使用者
您好,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
2樓:匿名使用者
'max和min不是自帶的系統函式,你必須自己定義:function max(a() as integer)as integer dim max as integer =a(1) //假設你陣列在外****定義的:dim a(1 to 10)什麼的…… dim i as integer for i=2 to ubound(a) if (maxa(i)) then min = a(i) end if next return min
end function
外部呼叫:dim a(1 to 10)b=max(a)c=min(a)
3樓:匿名使用者
vb自帶的函式中沒有你說的max和min函式。
4樓:匿名使用者
max(a, b) 換成iif(a>b,a,b)就成了
5樓:匿名使用者
b=dmax(a,a)
c=dmin(a,a)
自己錄個巨集看看就明白了
vb 中利用split函式求最大值和最小值**
6樓:兄弟連教育北京總校
1. 函式解釋抄
:將一個字串按照某個子字串分割成字元陣列。
function split(expression as string, [delimiter], [limit as long = -1], [compare as vbcomparemethod = vbbinarycompare])
member of vba.stringssplit a string into an array2. 例子
private sub command1_click()dim x as string
x = "a b c"
dim y
y = split(x, " ")
for i = 0 to ubound(y)debug.print y(i)
next
end sub
excel函式中min和max函式
某某 excel之max跟min函式 其實,樓主實際對excel 函式max和min沒有充分地理解 max函式編輯公式為 max number1 number2,number13,number,顯然是指的數字,max函式的意義在於從number1到無窮盡的數字當中,找出最大的一個數字 當然,這個nu...
C 中的min和max函式的問題
倫歆欒曉絲 包含在c 標準庫中標頭檔案 中,在標頭檔案 中定義了min,max的巨集,若在包含 的同時包含 會導致函式無法使用。提供了 cpp min等函式來代替min函式的功能。c 11標準 中min函式的原型 default 1 template const t min const t a,co...
VB中的子函式或函式未定義怎麼回事
過程名稱拼錯。檢查拼寫並改正。試圖從另一個工程呼叫過程,但並沒有在 引用 對話方塊中將該引用新增到該工程。子函式或函式未定義屬 sub,function,或 property 未定義 錯誤 35 sub,function,或 property 未定義 錯誤 35 子函式或函式未定義屬 sub,fun...