一個動態數組 a，如果你已經使用redim 語句給它設定了大小，那么在此之后使用 ubound(a) 就可以得到它的上邊界。 
如果你沒有使用 redim 語句給它設定大小，直接使用 ubound(a) 函數，那么運行時會報錯，并會中斷程序的執行.我們恰恰利用這一點，可以知道這個數組還沒有任何元素。于此同時，我們卻不想程序中斷執行，那么可以在 ubound(a) 函數執行前加上一句 

復制代碼代碼如下:

on error resume next 

把本功能寫成一個函數 function get_element_count_of_one_aray(name_of_aray) 

復制代碼代碼如下:

on error resume next 
uper_bound_of_aray=ubound(name_of_aray) 
if err then 
get_element_count_of_one_aray=0 
else 
get_element_count_of_one_aray=uper_bound_of_aray+1 
end if 
end function