listbox.aspx
来自「ASP.NET精彩编程百例」· ASPX 代码 · 共 57 行
ASPX
57 行
<html>
<script language="VB" runat=server>
Sub Page_Load()
If rbtnMulti.Checked
list1.SelectionMode=ListSelectionMode.Multiple
Else
list1.SelectionMode=ListSelectionMode.Single
End If
If Not IsPostBack
Dim values as ArrayList=new ArrayList()
values.add("摩托罗拉")
values.add("索尼爱立信")
values.add("诺基亚")
values.add("三星")
list1.datasource=values
list1.databind
Else
Dim i as int32
Dim tmpStr as String
For i=0 to list1.items.count-1
If list1.items(i).selected
tmpStr=tmpStr & " " & list1.items(i).text
End If
Next
If tmpStr is Nothing
tmpStr="nothing!"
End If
lblTxt.text="您选择了: " & tmpStr
End If
End Sub
</script>
<body >
<H3>使用BoxList控件<Hr></H3>
<center>
<form method="POST" runat=server>
请选择
<br>
<asp:ListBox id="list1" runat=server/>
<p>
<asp:RadioButton id="rbtnSingle" Checked=True text="单项选择"
groupname="group1" runat=server />
<asp:RadioButton id="rbtnMulti" text="多项选择"
groupname="group1" runat=server />
<br>
<asp:button text="提交" runat=server />
<hr>
<asp:label id="lblTxt" runat=server />
</form>
</center>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?