新客网WWW.XKER.COM:致力做中国最专业的网络学院!
学院: 操作系统 - 网络应用 - 服务器 - 网络安全 - 工具软件 - 办公软件 - Web开发 - 数据库 - 网页设计 - 图形图像 - 媒体动画 - 硬件学堂 - 存储频道 - QQ专区
您的位置:首页 > 软件开发 > Web开发 > Asp教程 > 正文:DropDownList 控件 DataTextField 和 DataValueField 分开绑定

DropDownList 控件 DataTextField 和 DataValueField 分开绑定

新客网 XKER.COM 2004-11-10 来源: 收藏本文
<SCRIPT runat="server">

Sub Page_Load

If Not Page.IsPostBack Then

Dim URLs = New SortedList()
URLs.Add("Google", "http://www.google.com")
URLs.Add("MSN", "http://search.msn.com")
URLs.Add("Yahoo", "http://www.yahoo.com")
URLs.Add("Lycos", "http://www.lycos.com")
URLs.Add("AltaVista", "http://www.altavista.com")
URLs.Add("Excite", "http://www.excite.com")

'-- Bind SortedList to controls

RadioButtons.DataSource = URLs
RadioButtons.DataTextField = "Key"
RadioButtons.DataValueField = "Value"
RadioButtons.DataBind()

CheckBoxes.DataSource = URLs
CheckBoxes.DataTextField = "Key"
CheckBoxes.DataValueField = "Value"
CheckBoxes.DataBind()

DropDownList.DataSource = URLs
DropDownList.DataTextField = "Key"
DropDownList.DataValueField = "Value"
DropDownList.DataBind()

ListBox.DataSource = URLs
ListBox.DataTextField = "Key"
ListBox.DataValueField = "Value"
ListBox.DataBind()

End If

End Sub

</SCRIPT>
收藏】 【评论】 【推荐】 【投稿】 【打印】 【关闭
发表评论
要记得去论坛讨论,点击注册新会员匿名评论
评论内容:不能超过250字,需审核后才会公布,请自觉遵守互联网相关政策法规。
阅读排行
随机推荐
实用信息推荐