VB.net에서 데이터 테이블 열 이름에 조건부로 숨겨진 필드 값을 설정합니다.

Question

데이터 테이블 열 이름에 따라 값을 설정하려는 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 

Answer 1

나는 당신이 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