[英]VB.net setting hidden field value to Data table column names conditionally
我有一組asp隱藏字段控件,我希望根據我的數據表列名稱設置值,返回的列數也不同,所以如果不使用,我會將未使用的隱藏字段設置為0。 到目前為止,我一直在嘗試以下工作,以便相應地設置正確的隱藏字段。
VB-
Dim dt As DataTable
Dim ds As New DataSet()
ds = Getdata(4)
dt = ds.Tables(0)
Dim ColCnt As String = dt.Columns.Count 'Current ColCnt is 3
For Each column As DataColumn In dt.Columns
Select Case ColCnt
Case 2
hxValue.Value = column.ColumnName 'set to 1st Column Name
hxValue1.Value = 0 'Not used
hyValue.Value = column.ColumnName 'Set To 2nd Column Name
Case 3
hxValue.Value = column.ColumnName 'set to 1st Column Name
hxValue1.Value = column.ColumnName 'set to 2nd Column Name
hyValue.Value = column.ColumnName 'set to 3rd Column Name
End Select
Next
試試這個,我認為您不需要For Each
循環:
Dim ColCnt As Int = dt.Columns.Count 'Current ColCnt is 3
Select Case ColCnt
Case 2
hxValue.Value = dt.Columns[0].ColumnName 'set to 1st Column Name
hxValue1.Value = 0 'Not used
hyValue.Value = dt.Columns[1].ColumnName 'Set To 2nd Column Name
Case 3
hxValue.Value = dt.Columns[0].ColumnName 'set to 1st Column Name
hxValue1.Value = dt.Columns[1].ColumnName 'set to 2nd Column Name
hyValue.Value = dt.Columns[2].ColumnName 'set to 3rd Column Name
End Select
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.