Re: [VB6 ] 陣列中 最大值
※ 引述《kc5566 (56專業文)》之銘言：
: 大家好
: 小弟平常都用matlab
: disp(max(abs([D(:,2)])));
: 這是matlab可以直接判斷並顯示陣列中取決對值後的最大值
: 不知道 VB6 是否有跟matlab一樣
: 可以直接讀取陣列中最大值
: 然後再Print出來
Function GetArrAbsMax(Arr As Variant) As Variant
Dim i As Long, AbsVal As Variant
For i = 0 To UBound(Arr)
AbsVal = Abs(Arr(i))
If AbsVal > GetArrAbsMax Then GetArrAbsMax = AbsVal
Next
End Function
不知你道的陣列形別,所以用 Variant,想要跑快點,可以取代成你的陣列形別
--
████ █ ★ ████ █ █ █
█ █ █ █ █ █ 超 級 熱 烈 歡 迎
█ ████ █ █ █ ████ █
█ █ █ █ ███★ █ █ 歡迎到嘉義版!
★███ █ █ █ █ █ █ █
訊馳電腦-路徑 → 嘉義市林森西路496號 →(05)2244-526 → 順發斜對面
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 114.47.44.96
推
06/12 00:50, , 1F
06/12 00:50, 1F
討論串 (同標題文章)
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
