📄 showcode.asp@source=demo_hashtable_radio2
字号:
<HTML>
<HEAD></HEAD>
<FONT FACE="Verdana, Arial, Helvetica" SIZE=2>
<FONT COLOR=#0000ff><script runat="server"><br />sub Page_Load<br />if Not Page.IsPostBack then<br /> dim navigate=New Hashtable<br /> navigate.Add("RadioButtonList","control_radiobuttonlist.asp")<br /> navigate.Add("CheckBoxList","control_checkboxlist.asp")<br /> navigate.Add("DropDownList","control_dropdownlist.asp")<br /> navigate.Add("ListBox","control_listbox.asp")<br /> rb.DataSource=navigate<br /> rb.DataValueField="Value"<br /> rb.DataTextField="Key"<br /> rb.DataBind()<br />end if<br />end sub<br /><br />sub navigate(s as Object, e As EventArgs)<br />response.redirect(rb.SelectedItem.Value)<br />end sub<br /></script></FONT><br /><br /><html><br /><body><br /><br /><form runat="server"><br /><asp:RadioButtonList id="rb" runat="server"<br />AutoPostBack="True" onSelectedIndexChanged="navigate" /><br /></form><br /><br /></body><br /></html><br />
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -