如何在VBS中使用vbscript队列-创新互联

如何在VBS中使用 vbscript队列?针对这个问题,这篇文章详细介绍了相对应的分析和解答,希望可以帮助更多想解决这个问题的小伙伴找到更简单易行的方法。

成都创新互联服务项目包括安化网站建设、安化网站制作、安化网页制作以及安化网络营销策划等。多年来,我们专注于互联网行业,利用自身积累的技术优势、行业经验、深度合作伙伴关系等,向广大中小型企业、政府机构等提供互联网行业的解决方案,安化网站推广取得了明显的社会效益与经济效益。目前,我们服务的客户以成都为中心已经辐射到安化省份的部分城市,未来相信会继续扩大服务区域并继续获得客户的支持与信任!

脚本文件:c.vbs,包含队列的添加元素(入队)、删除元素(出队)、遍历、统计元素个数、清空

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

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

'查看队列中的元素数
WScript.Echo "队列中的元素数: " & Que.Count

WScript.Echo

'遍历队列
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

'退出队列
WScript.Echo Que.DeQueue
WScript.Echo "---"
TraverseQue
WScript.Echo

'清空队列
Que.Clear
WScript.Echo "队列中的元素数: " & Que.Count

调用方法:通过双击c.bat调用,c.bat代码如下:

cscript c.vbs
pause

运行结果截图:

如何在VBS中使用 vbscript队列

关于如何在VBS中使用 vbscript队列问题的解答就分享到这里了,希望以上内容可以对大家有一定的帮助,如果你还有很多疑惑没有解开,可以关注创新互联行业资讯频道了解更多相关知识。


网页名称:如何在VBS中使用vbscript队列-创新互联
转载来于:http://pwwzsj.com/article/ceeogc.html