取得Application 对象变量的语法如下所示：
变数=Application("变量名称")
接下来我们来实际操作Application 变量。下列范例宣告了三个Application 对象变量，利用循环显示后并清除：
<Html>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object,e As Eventargs)
Dim shtI As Short
Application.Add("App1","Value1")
Application.Add("App2","Value2")
Application.Add("App3","Value3")
For shtI=0 To Application.Count-1
Response.Write("变量名：" & Application.GetKey(shtI) )
Response.Write(" ,变数值：" & Application.Item(shtI) & "<P>")
Next
Application.Clear()
End Sub
</Script>
</Html>
上述范例我们利用Application 的Add 方法产生Application 变量并指定初始值，所有的Application 变量都放在Application 集合中由Application 对象管理。所以我们要取出集合中的对象可以使用For...Next 循环或是For Each 循环，循环中分别使用GetKey 方法传回变量名称，Item属性传回变量内容，程序最后将全部在集合中的变量用Clear 方法清除。
文章来源于领测软件测试网 https://www.ltesting.net/
