Question

我想通过索引从数据行中的特定列获取值，我在访问返回的第二行中的值时遇到问题，下面是我正在尝试实现的内容

            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

Answer 1

您的drSeries变量始终位于第一行。您应该切换到循环内的第二行

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

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

1 个答案: