VBA 計算陣列的最大索引和最小索引

2022-03-10 21:38:51 字數 1185 閱讀 4248

計算資料的最大索引和最小索引分別用 ubound 和 lbound 函式。對於多維索引需要指定資料的目標維度。

1、一維陣列

sub

arr_idx_cnt()

dim arr(23

to72)      '

定義陣列

static min_idx, max_idx, n as

integer, msg as

string

'宣告本地變數

min_idx = lbound

(arr)

max_idx = ubound

(arr)

n = max_idx - min_idx + 1

msg = "

陣列的最小索引號是:

" & min_idx & chr(13

) _ & "

陣列的最大索引號是:

" & max_idx & chr(13

) _ & "

陣列的元素個數是:

" &n

msgbox

msgend sub

執行**,彈出下邊的訊息框

2、多維陣列

sub

arr_idx_cnt()

dim arr(23, 72)      '

定義二維陣列

static min_idx_a, max_idx_b, n as

integer, msg as

string

'宣告本地變數

min_idx_a = lbound(arr, 1

) max_idx_b = ubound(arr, 2

) msg = "

陣列第一維度的最小索引號是:

" & min_idx_a & chr(13) &_

"陣列第二維度的最大索引號是:

" &max_idx_b

msgbox

msgend sub

執行**,彈出下邊的訊息框

計算陣列中的最小值和最大值

下面 中的第一種方法是最簡單最容易想到的方法,但比較次數較多,所用時間較長。第二種方法的效率就高一些了。public class getminmaxvalue getminmax1 a getminmax2 a public static void getminmax1 int a system.o...

呼叫方法計算陣列的和,最大值,最小值

1 using system 2using system.collections.generic 3using system.linq 4using system.text 5using system.threading.tasks 67 namespace8 15int max,min,sum 1...

計算陣列的小和

題目 陣列小和的定義如下 例如,陣列s 1,3,5,2,4,6 在s 0 的左邊小於或等於s 0 的數的和為0,在s 1 的左邊小於或等於s 1 的數的和為1,在s 2 的左邊小於或等於s 2 的數的和為1 3 4,在s 3 的左邊小於或等於s 3 的數的和為1,在s 4 的左邊小於或等於s 4 的...