<%@ Page Language="VB" %>
<script runat="server">
Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
Dim myStack As New System.Collections.Generic.Stack(Of String)
myStack.Push("A")
myStack.Push("B")
myStack.Push("C")
Dim myArray As Array
myArray = myStack.ToArray()
For Each item As String In myArray
Label1.Text += item & "<br />"
Next
End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<asp:Label runat="server" ID="Label1"></asp:Label>
</div>
</form>
</body>
</html>
|