国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

VBScript 動態 Array 的實現代碼

2020-07-26 11:19:35
字體:
來源:轉載
供稿:網友

記錄一個小方法,關于 VBScript 中,動態 Array 的實現,也適用于 VBA,

在很久以前,寫 VBA 的時候,就覺得使用 Array 和不方便,因為大小固定,
當時想的是,要是 Array 可以像 Python 里的 list 一樣好用該多好啊,
那么下面,就記錄一個方法,能讓 Array 變得動態,并且好用!

實現方法:

在下面的實例中,先設定一個空的 Array 出來,
然后用,下面的方法實現動態 Array,
并且,把數字 1 到 10,一個加到 Array 中去。

'動態 Array 實現

myArray = Array()For i = 1 To 10  ReDim Preserve myArray(UBound(myArray) + 1)  myArray(UBound(myArray)) = iNext

那么動態 Array 就這么開心的實現啦,(^_−)☆

對比下和 Python list 的代碼吧,感覺是不是很像呢。

# Python 中 list 的使用myList = list()for i in range(10):  myList.append(i)print(myList)

數據輸出:

然后,思考下一個問題,也是我之前寫 VBA 時候考慮的問題,
就是,怎么一下子,看到 Array 中所有的數據,
之前的本方法,是使用 For Loop,把 Array 中的數據一個個 Print 出來,
但是現在發現了簡單的方法,代碼如下:

'最簡單的方法:

MsgBox Join (myArray, vblf)'之前使用的笨方法:For Each i In myArray  Debug.Print iNext

結束語:

上面的動態 Array 方法,在 VBScript 和 VBA 中都可用!

總結

到此這篇關于VBScript 動態 Array 的實現代碼的文章就介紹到這了,更多相關VBScript 動態 Array內容請搜索武林網以前的文章或繼續瀏覽下面的相關文章希望大家以后多多支持武林網!

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 县级市| 府谷县| 晋宁县| 杨浦区| 泊头市| 吉安市| 遵义县| 如东县| 长顺县| 扶沟县| 湟中县| 乌兰浩特市| 新河县| 嫩江县| 犍为县| 图木舒克市| 永定县| 内江市| 垦利县| 阳江市| 自治县| 团风县| 濮阳县| 舞钢市| 永春县| 新民市| 青河县| 潜江市| 子长县| 绥宁县| 西藏| 苍溪县| 和林格尔县| 墨江| 镇平县| 崇州市| 萨迦县| 育儿| 乾安县| 江西省| 靖宇县|