DropDownList绑定DataTable

DropDownList绑定DataTable        Dim qx As String()        qx = Split(“白色,兰色,黄色,黑色,红色”, “,”)        Dim dt As DataTable = New DataTable(“col”)        Dim dc As DataColumn = New DataColumn(“str”)        dt.Columns.Add(dc) 

DropDownList绑定DataTable
        
Dim
 qx 
As
 
String
()
DropDownList绑定DataTable        qx 

=
 
Split
(

白色,兰色,黄色,黑色,红色



,

)
DropDownList绑定DataTable        

Dim
 dt 
As
 DataTable 
=
 
New
 DataTable(

col

)
DropDownList绑定DataTable        

Dim
 dc 
As
 DataColumn 
=
 
New
 DataColumn(

str

)
DropDownList绑定DataTable        dt.Columns.Add(dc)
DropDownList绑定DataTable        

Dim
 n 
As
 
Integer

DropDownList绑定DataTable        

For
 n 
=
 
0
 
To
 qx.Length 

 
1

DropDownList绑定DataTable            

Dim
 dr 
As
 DataRow 
=
 dt.NewRow
DropDownList绑定DataTable            dr(

0

=
 qx(n)
DropDownList绑定DataTable            dt.Rows.Add(dr)
DropDownList绑定DataTable        

Next

DropDownList绑定DataTable 
DropDownList绑定DataTable        DropDownList1.DataTextField 

=
 

str


DropDownList绑定DataTable        DropDownList1.DataValueField 

=
 

str


DropDownList绑定DataTable        DropDownList1.DataSource 

=
 dt
DropDownList绑定DataTable        DropDownList1.DataBind()

 今天的文章DropDownList绑定DataTable分享到此就结束了,感谢您的阅读,如果确实帮到您,您可以动动手指转发给其他人。

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。
如需转载请保留出处:https://bianchenghao.cn/25692.html

(0)
编程小号编程小号

相关推荐

发表回复

您的电子邮箱地址不会被公开。 必填项已用*标注