VBS基础篇 – vbscript堆栈（visual studio 堆栈窗口）奔走相告

文章摘要

本文介绍了在Windows PowerShell中使用堆栈进行操作的方法。通过代码示例展示了如何**创建堆栈**、**添加元素**、**查看元素数量**、**遍历堆栈**、**出栈元素**以及**清空堆栈**。文章重点说明了堆栈的基本操作流程，包括使用`CreateObject`方法创建堆栈对象，`Push`方法添加元素，`Pop`方法取出元素，以及`TraverseStk`子程序的实现，用于遍历堆栈中的元素。此外，代码还演示了如何使用`Count`属性查看堆栈中的元素数量，并通过示例展示了堆栈操作的实际应用。

Option Explicit

‘建立堆栈
Dim Stk : Set Stk=CreateObject(“System.Collections.Stack”)

Stk.Push “Element1”
Stk.Push “Element2”
Stk.Push “Element3”

‘查看堆栈中的元素数
WScript.Echo “堆栈中的元素数: ” & Stk.Count

WScript.Echo

‘遍历堆栈
Sub TraverseStk
Dim ArrStk : ArrStk=Stk.ToArray
Dim Counter
For Counter=0 To UBound(ArrStk)
WScript.Echo ArrStk(Counter)
Next
End Sub
TraverseStk

WScript.Echo

‘元素出栈
WScript.Echo Stk.Pop
WScript.Echo “—”
TraverseStk

WScript.Echo

‘清空堆栈
Stk.Clear
WScript.Echo “堆栈中的元素数: ” & Stk.Count