SortedList 對象結(jié)合了 ArrayList 對象和 Hashtable 對象的特性。

嘗試一下 - 實(shí)例

SortedList RadiobuttonList 1

SortedList RadiobuttonList 2

SortedList DropDownList

SortedList 對象

SortedList 對象包含用鍵/值對表示的項(xiàng)目。SortedList 對象按照字母順序或者數(shù)字順序自動(dòng)地對項(xiàng)目進(jìn)行排序。

通過 Add() 方法向 SortedList 添加項(xiàng)目。通過 TrimToSize() 方法把 SortedList 調(diào)整為最終尺寸。

下面的代碼創(chuàng)建了一個(gè)名為 mycountries 的 SortedList 對象，并添加了四個(gè)元素：

<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
   dim mycountries=New SortedList
   mycountries.Add("N","Norway")
   mycountries.Add("S","Sweden")
   mycountries.Add("F","France")
   mycountries.Add("I","Italy")
end if
end sub
</script>

數(shù)據(jù)綁定

SortedList 對象可為下列的控件自動(dòng)生成文本和值：

  • asp:RadioButtonList
  • asp:CheckBoxList
  • asp:DropDownList
  • asp:Listbox

為了綁定數(shù)據(jù)到 RadioButtonList 控件，首先要在 .aspx 頁面中創(chuàng)建一個(gè) RadioButtonList 控件（不帶任何 asp:ListItem 元素）：

<html>
<body>

<form runat="server">
<asp:RadioButtonList id="rb" runat="server" AutoPostBack="True" />
</form>

</body>
</html>

然后添加創(chuàng)建列表的腳本，并且綁定列表中的值到 RadioButtonList 控件：

<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
   dim mycountries=New SortedList
   mycountries.Add("N","Norway")
   mycountries.Add("S","Sweden")
   mycountries.Add("F","France")
   mycountries.Add("I","Italy")
   rb.DataSource=mycountries
   rb.DataValueField="Key"
   rb.DataTextField="Value"
   rb.DataBind()
end if
end sub
</script>

<html>
<body>

<form runat="server">
<asp:RadioButtonList id="rb" runat="server" AutoPostBack="True" />
</form>

</body>
</html>

然后我們添加一個(gè)子例程，當(dāng)用戶點(diǎn)擊 RadioButtonList 控件中的某個(gè)項(xiàng)目時(shí)，該子例程會(huì)被執(zhí)行。當(dāng)某個(gè)單選按鈕被點(diǎn)擊時(shí)，label 中會(huì)出現(xiàn)一行文本：

實(shí)例

<script  runat="server">
sub Page_Load
if Not Page.IsPostBack then
   dim mycountries=New SortedList
   mycountries.Add("N","Norway")
   mycountries.Add("S","Sweden")
   mycountries.Add("F","France")
   mycountries.Add("I","Italy")
   rb.DataSource=mycountries
   rb.DataValueField="Key"
   rb.DataTextField="Value"
   rb.DataBind()
end if
end sub

sub displayMessage(s as Object,e As EventArgs)
lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
end sub
</script>

<!DOCTYPE html>
<html>
<body>

<form runat="server">
<asp:RadioButtonList id="rb" runat="server"
AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
<p><asp:label id="lbl1" runat="server" /></p>
</form>

</body>
</html>

運(yùn)行實(shí)例 ?

點(diǎn)擊 "運(yùn)行實(shí)例" 按鈕查看在線實(shí)例