Tymczasowa tabela nie zawiera żadnych informacji, ale oryginalna tabela zawiera

Question 1

Mam tabelę danych, w której znajdują się wszystkie dane, ale kiedy mój VB.net program uruchamia go, i tworzę uwodzicielski, u kuszący nie ma informacji. Co robię nie tak?

 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

Przypnę zdjęcia 1 mojej tabeli danych przed jej uruchomieniem, aby tam była informacja, a druga-po uruchomieniu pokazuje, że jest pusty. Teraz nawet dostaję dane bezpośrednio z tabeli, a nie jej kopię lub coś bardziej kuszącą.

Question 2

Odpowiedź jest w tym, że twój problem leży w innym. Wykorzystując ten przykład do symulacji kodu, ja nigdy nie mogę uzyskać obiekty bez linii

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

Wyjście

5
5
5
5
HTS Kod NA:
6
7
8
9
10

Question 3

Myślę, że to z powodu mojej głupoty nigdy nie łączył tabelę z tą formą. Jak tylko to zrobiłem, stół był pełen i pracował. Przepraszam i dziękuję

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

Odpowiedź jest w tym, że twój problem leży w innym. Wykorzystując ten przykład do symulacji kodu, ja nigdy nie mogę uzyskać obiekty bez linii

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

Wyjście

5
5
5
5
HTS Kod NA:
6
7
8
9
10

próbowałem użyć tego kodu w visual studios vb.net ale u mnie to nie działa. Nie wiem, jak włączyć to w mój kod

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

Myślę, że to z powodu mojej głupoty nigdy nie łączył tabelę z tą formą. Jak tylko to zrobiłem, stół był pełen i pracował. Przepraszam i dziękuję

Tymczasowa tabela nie zawiera żadnych informacji, ale oryginalna tabela zawiera

Pytanie

Najlepsza odpowiedź

W innych językach

Ta strona jest w innych językach

Popularne w tej kategorii

Najczęściej zadawane pytania w tej kategorii