ASP.Netのお勉強

PropertyとListBox＠ASP.Net

PropertyとListBoxを利用します。
ここでは、たまたまListBoxなだけです。
Propertyを利用すれば、何かと便利です。

Propertyのクラスを作成します。
ここでは、クラス名をParamとして作成しています。

画面にListBoxを配置します。
DataTextField、DataValueFieldに、ParamクラスのNoとNameを設定します。

asp.vb側では、ページロード時にParamクラスの配列を作成し、
ListBoxのDataSourceに設定し、DataBindを行います。

●aspx

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default4.aspx.vb" Inherits="Default4" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>PropertyとListBoxの</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
        <asp:ListBox ID="ListBox1" runat="server" DataTextField="Name" DataValueField="Cd"></asp:ListBox>
    </div>
    </form>
</body>
</html>


●aspx.vb

Partial Class Default4
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim param(1) As Param

        param(0) = New Param()
        param(0).Cd = "コード1"
        param(0).Name = "名前1"

        param(1) = New Param()
        param(1).Cd = "コード2"
        param(1).Name = "名前2"

        Me.ListBox1.DataSource = param
        Me.ListBox1.DataBind()
    End Sub

End Class


●Param.vb

Imports Microsoft.VisualBasic

Public Class Param

    'CD
    Private strCd As String = 0
    Public Property Cd() As String
        Get
            Return strCD
        End Get
        Set(ByVal Value As String)
            strCD = Value
        End Set
    End Property

    'Name
    Private strName As String = 0
    Public Property Name() As String
        Get
            Return strName
        End Get
        Set(ByVal Value As String)
            strName = Value
        End Set
    End Property

End Class

Copyright (C) ASP.Netのお勉強. All Rights Reserved.