欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

VBS基礎(chǔ)篇 - vbscript隊(duì)列

 更新時間:2018年05月29日 22:45:14   投稿:mdxy-dxy  
VBS中的隊(duì)列需要使用System.Collections.Queue,包含隊(duì)列的添加元素(入隊(duì))、刪除元素(出隊(duì))、遍歷、統(tǒng)計(jì)元素個數(shù)、清空 ,需要的朋友可以參考下

實(shí)例代碼

腳本文件:c.vbs,包含隊(duì)列的添加元素(入隊(duì))、刪除元素(出隊(duì))、遍歷、統(tǒng)計(jì)元素個數(shù)、清空

'建立隊(duì)列
Dim Que : Set Que = CreateObject("System.Collections.Queue")

Que.EnQueue("Element1")
Que.EnQueue("Element2")
Que.EnQueue("Element3")

'查看隊(duì)列中的元素?cái)?shù)
WScript.Echo "隊(duì)列中的元素?cái)?shù): " & Que.Count

WScript.Echo

'遍歷隊(duì)列
Sub TraverseQue
 Dim ArrQue : ArrQue = Que.ToArray
 Dim Counter
 For Counter = 0 To UBound(ArrQue)
  WScript.Echo ArrQue(Counter)
 Next
End Sub
TraverseQue

WScript.Echo

'退出隊(duì)列
WScript.Echo Que.DeQueue
WScript.Echo "---"
TraverseQue
WScript.Echo

'清空隊(duì)列
Que.Clear
WScript.Echo "隊(duì)列中的元素?cái)?shù): " & Que.Count

調(diào)用方法:通過雙擊c.bat調(diào)用,c.bat代碼如下:

cscript c.vbs
pause

運(yùn)行結(jié)果截圖:

相關(guān)文章

最新評論