简体   繁体   English

VB.Net按索引访问数据表并获取字段值

[英]VB.Net access data table row by index and get field value

I'm wanting to get the values from specific columns in a data row by index, I'm having a problem accessing the value from the second row that is returned, below is what I'm trying to achieve 我想按索引从数据行中的特定列获取值,从返回的第二行访问值时遇到问题,以下是我要实现的目标

            Dim daSeries As New dsSVTableAdapters.clsCH
            Dim dtSeries As New dsSV.SeriesDataTable
            Dim drSeries As dsSV.SeriesRow

            dtSeries = daSeries.CSeries(1)
            drSeries = dtSeries.Rows(0)

            Dim RowCnt As Integer = dtSeries.Rows.Count 'Current RowCnt is 2 

                Select Case RowCnt

                    Case 1 'Only One row exists
                        hxValue1.Value = drSeries.YFieldName 'access 1st row YFieldName
                        hyValue.Value = drSeries.XFieldName  'access 1st row XFieldName
                    Case 2 'Two rows exists
                        For i As Integer = 0 To dtSeries.Rows.Count - 1
                            If i = 0 Then 'First Row index
                                hxValue1.Value = drSeries.YFieldName  'access 1st row YFieldName
                                hyValue.Value = drSeries.XFieldName   'access 1st row XFieldName
                            ElseIf i = 1 Then  '2nd Row index
                                hxValue2.Value = drSeries.YFieldName 'access 2nd row YFieldName
                            End If
                        Next

                End Select

Your drSeries variable points always at the first row. 您的drSeries变量始终指向第一行。 You should change to the second row inside the loop 您应该更改为循环内的第二行

Case 2 'Two rows exists
    For i As Integer = 0 To dtSeries.Rows.Count - 1
        ' Simply add this to your loop
        drSeries = dtSeries.Rows(i)

        If i = 0 Then 'First Row index
            hxValue1.Value = drSeries.YFieldName  'access 1st row YFieldName
            hyValue.Value = drSeries.XFieldName   'access 1st row XFieldName
        ElseIf i = 1 Then  '2nd Row index
            hxValue2.Value = drSeries.YFieldName 'access 2nd row YFieldName
        End If
    Next

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM