Mega Code Archive

 
Categories / ASP.Net Tutorial / Collections
 

A generic Stack class (VB)

<%@ 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>