01.<%@ Page Language="VB" %>
02.<script runat="server">
03. Sub Page_Load(sender As Object, e As EventArgs)
04. Dim objSortedList As SortedList
05. Dim i As Integer
06. Dim lsItem As String
07.
08. objSortedList = New SortedList
09.
10. objSortedList.Add("white", "#FFFFFF")
11. objSortedList.Add("black", "#000000")
12. objSortedList.Add("red", "#FF0000")
13. objSortedList.Add("yellow", "#FFFF00")
14. objSortedList.Add("green", "#00FF00")
15.
16. Session("mySession") = objSortedList
17.
18. Me.lblText.Text = "SortedList Created <a href=AspNetSortedListSession2.aspx>click here</a> to view"
19.
20. End Sub
21.</script>
22.<html>
23.<head>
24.<title>ThaiCreate.Com ASP.NET - SortedList</title>
25.</head>
26.<body>
27. <form id="form1" runat="server">
28. <asp:Label id="lblText" runat="server"></asp:Label>
29. <br />
30. </form>
31.</body>
32.</html>
VB.NET || 
ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน 
