請(qǐng)問vba中如何表達(dá)max(a,b)?
作者：金字塔 來源：cxh99.com 發(fā)布時(shí)間：2015年01月14日
- 咨詢內(nèi)容：
求二者之最大者/最小者/和等基本的運(yùn)算函數(shù)怎么表達(dá)?
- 金字塔客服：
dim pif c>o then p = c else p=o
- 用戶回復(fù)：
謝謝,我不是問的這種表達(dá)方式.
- 網(wǎng)友回復(fù)：
function max(info)
arr=split(info,",")
max=clng(arr(0))
for i=1 to ubound(arr)
if clng(arr(i))>clng(max) then
max=clng(arr(i))
end if
next
end function
function min(info)
arr=split(info,",")
min=clng(arr(0))
for i=1 to ubound(arr)
if clng(arr(i)) min=clng(arr(i))
end if
next
end function
'調(diào)用方式
'i=max("12,23,12,12,,32,43,54,43,56")
'i=min("12,12,23,3,454,34,4,5,45,3,232,3,2,43,4")
- 網(wǎng)友回復(fù)：
謝謝!感情你們把那么多的vba函數(shù)都閹割了
打印本文
關(guān)閉窗口