Временная таблица не содержит никакой информации, но исходная таблица содержит

Question 1

У меня есть таблица данных, в которой есть все данные, но когда мой VB.net программа запускает его, и я создаю соблазнительный, у соблазнительного нет информации. Что я делаю не так?

 Public Sub HTSCode()
    Dim TempTable As New DataTable
    Dim DV As DataView

    TempTable = RatesDataSet.HTS
    DV = TempTable.DefaultView
    DV.Sort = "HTS Code NA"
    TempTable = DV.ToTable
    For Each Row As DataRow In TempTable.Rows
        'doesnt get to this point cause there are no rows.
    Next
End Sub

Я прикрепляю фотографии 1 моей таблицы данных перед ее запуском, чтобы там была информация, а вторая-при запуске она показывает, что она пуста. Теперь я даже получаю данные непосредственно из таблицы, а не ее копию или что-то более заманчивое.

Question 2

Ответ в том, что ваша проблема кроется в другом. Используя этот пример для имитации вашего кода, я никогда не смогу получить объект без строк

Public Class ds
    Public ReadOnly Property HTS As DataTable
        Get
            Dim dt As New DataTable()
            dt.Columns.AddRange(
                {
                    New DataColumn("HTS Code", GetType(Integer)),
                    New DataColumn("HTS Code NA", GetType(Integer))
                })
            For i = 0 To 4
                Dim row = dt.NewRow()
                row("HTS Code") = i
                row("HTS Code NA") = 10 - i
                dt.Rows.Add(row)
            Next
            Return dt
        End Get
    End Property
End Class

Dim RatesDataSet = New ds

Dim TempTable As DataTable
Dim DV As DataView

TempTable = RatesDataSet.HTS
Console.WriteLine(TempTable.Rows.Count)
DV = TempTable.DefaultView
Console.WriteLine(DV.Count)
DV.Sort = "HTS Code NA"
Console.WriteLine(DV.Count)
TempTable = DV.ToTable
Console.WriteLine(TempTable.Rows.Count)
Console.WriteLine("HTS Code NA:")
For Each Row As DataRow In TempTable.Rows
    Console.WriteLine(Row("HTS Code NA"))
Next

Выход

5
5
5
5
HTS Код NA:
6
7
8
9
10

Question 3

Я думаю, что это из-за моей тупости я никогда не связывал таблицу с этой формой. Как только я это сделал, стол был заполнен и работал. Извините и спасибо

djv · Answer 1 · 2021-11-23T22:30:04

Ответ в том, что ваша проблема кроется в другом. Используя этот пример для имитации вашего кода, я никогда не смогу получить объект без строк

Public Class ds
    Public ReadOnly Property HTS As DataTable
        Get
            Dim dt As New DataTable()
            dt.Columns.AddRange(
                {
                    New DataColumn("HTS Code", GetType(Integer)),
                    New DataColumn("HTS Code NA", GetType(Integer))
                })
            For i = 0 To 4
                Dim row = dt.NewRow()
                row("HTS Code") = i
                row("HTS Code NA") = 10 - i
                dt.Rows.Add(row)
            Next
            Return dt
        End Get
    End Property
End Class

Dim RatesDataSet = New ds

Dim TempTable As DataTable
Dim DV As DataView

TempTable = RatesDataSet.HTS
Console.WriteLine(TempTable.Rows.Count)
DV = TempTable.DefaultView
Console.WriteLine(DV.Count)
DV.Sort = "HTS Code NA"
Console.WriteLine(DV.Count)
TempTable = DV.ToTable
Console.WriteLine(TempTable.Rows.Count)
Console.WriteLine("HTS Code NA:")
For Each Row As DataRow In TempTable.Rows
    Console.WriteLine(Row("HTS Code NA"))
Next

Выход

5
5
5
5
HTS Код NA:
6
7
8
9
10

пытался использовать этот код в visual studios vb.net но у меня это не работает. Не знаю, как включить это в мой код

Mike · Answer 2 · 2021-12-02T00:06:36

Я думаю, что это из-за моей тупости я никогда не связывал таблицу с этой формой. Как только я это сделал, стол был заполнен и работал. Извините и спасибо

Временная таблица не содержит никакой информации, но исходная таблица содержит

Вопрос

Лучший ответ

На других языках

Эта страница на других языках

Популярное в этой категории

Популярные вопросы в этой категории