showcode.asp@source=demo_hashtable_drop1

来自「W3Schools tutorial..web designing」· ASP@SOURCE=DEMO_HASHTABLE_DROP1 代码 · 共 10 行

ASP@SOURCE=DEMO_HASHTABLE_DROP1
10
字号


<HTML>
<HEAD></HEAD>
<FONT FACE="Verdana, Arial, Helvetica" SIZE=2>
<FONT COLOR=#0000ff>&lt;script&nbsp; runat="server"><br />sub Page_Load<br />if Not Page.IsPostBack then<br />&nbsp;&nbsp;  dim mycountries=New Hashtable<br />&nbsp;&nbsp;  mycountries.Add("N","Norway")<br />&nbsp;&nbsp;  mycountries.Add("S","Sweden")<br />&nbsp;&nbsp;  mycountries.Add("F","France")<br />&nbsp;&nbsp;  mycountries.Add("I","Italy")<br />&nbsp;&nbsp;  dd.DataSource=mycountries<br />&nbsp;&nbsp;  dd.DataValueField="Key"<br />&nbsp;&nbsp;  dd.DataTextField="Value"<br />&nbsp;&nbsp;  dd.DataBind()<br />end if<br />end sub<br /><br />sub displayMessage(s as Object,e As EventArgs)<br />lbl1.text="Your favorite country is: " & dd.SelectedItem.Text<br />end sub<br />&lt;/script&gt;</FONT><br /><br />&lt;html><br />&lt;body><br /><br />&lt;form runat="server"><br />&lt;asp:DropDownList id="dd" runat="server"<br />AutoPostBack="True" onSelectedIndexChanged="displayMessage" /><br />&lt;p>&lt;asp:label id="lbl1" runat="server" />&lt;/p><br />&lt;/form><br /><br />&lt;/body><br />&lt;/html><br />

</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?