📄 dropdownlistdatavalue.aspx

📁 asp.net技术内幕的书配源码

💻 ASPX

字号:

<%@ Import namespace="System.Data" %>
<Script runat="Server">

Sub Page_Load
  If Not IsPostBack Then
    Dim dtbMusic As New DataTable
    Dim drowNewRows As DataRow

    dtbMusic.Columns.Add( _
      New DataColumn( "CategoryName", GetType( String ) ) )
    dtbMusic.Columns.Add( _
      New DataColumn( "CategoryID", GetType( String ) ) )
    drowNewRows = dtbMusic.NewRow()
    drowNewRows( "CategoryName" ) = "Country Music"
    drowNewRows( "CategoryID" ) = "country"
    dtbMusic.Rows.Add( drowNewRows )
    drowNewRows = dtbMusic.NewRow()
    drowNewRows( "CategoryName" ) = "Rock Music"
    drowNewRows( "CategoryID" ) = "rock"
    dtbMusic.Rows.Add( drowNewRows )
    drowNewRows = dtbMusic.NewRow()
    drowNewRows( "CategoryName" ) = "Classical Music"
    drowNewRows( "CategoryID" ) = "classical"
    dtbMusic.Rows.Add( drowNewRows )

    dropCategory.DataSource = dtbMusic
    dropCategory.DataTextField = "CategoryName"
    dropCategory.DataValueField = "CategoryID"
    dropCategory.DataBind
  End If
End Sub

</script>

<html>
<head><title>DropDownListDataValue.aspx</title></head>
<body>

<form Runat="Server">

<asp:DropDownList
  ID="dropCategory"
  Runat="Server"/>

</form>

</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -