vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 NEU! sevCoolbar 3.0 - Professionelle Toolbars im modernen Design!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
Das geht doch bestimmt besser 
Autor: Vento
Datum: 03.08.05 17:23
Ich möchte in einem Datatable (dt) nach bestimmten Spalten suchen und nur diese dann erhalten. Vorher sind es 25 Spalten und am Ende noch 6.
Bisher mache ich das so: 

                Dim zaehl As Integer = -1
                Dim reset As Boolean = False
                Do While reset = False
                    zaehl = zaehl + 1
                    Try
                        If dt.DefaultView.Table.Columns(zaehl).Caption <> _
                          "Arbeit" And dt.DefaultView.Table.Columns( _
                          zaehl).Caption <> "verbleibend" And _
                          dt.DefaultView.Table.Columns(zaehl).Caption <> _
                          "Name" And dt.DefaultView.Table.Columns( _
                          zaehl).Caption <> "TName" And _
                          dt.DefaultView.Table.Columns(zaehl).Caption <> _
                          "Kommentar" And dt.DefaultView.Table.Columns( _
                          zaehl).Caption <> "Start" And _
                          dt.DefaultView.Table.Columns(zaehl).Caption <> _
                          "Ende" Then
                            dt.DefaultView.Table.Columns.RemoveAt(zaehl)
                            zaehl = -1
                        End If
                    Catch ex As Exception
                        reset = True
                    End Try
                Loop
Der Code funktioniert zwar, aber ich denke es gibt auch besser Lösungen, nur leider finde ich die nicht.
Bisher wird immer wieder bei Spalte 0 angefangen und wenn die Überschrift nicht zu den 6 gehört geht es wieder von vorne los.
Am Ende kommt dann der Catch weil die 7te Spalte ja nicht mehr vorhanden ist.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Das geht doch bestimmt besser806Vento03.08.05 17:23
Re: Das geht doch bestimmt besser565Urot03.08.05 17:53
Re: Das geht doch bestimmt besser554Vento04.08.05 08:45
Re: Das geht doch bestimmt besser452ModeratorFZelle04.08.05 10:13
Re: Das geht doch bestimmt besser513Vento04.08.05 10:25
Re: Das geht doch bestimmt besser460ModeratorFZelle04.08.05 16:08
Re: Das geht doch bestimmt besser471Vento08.08.05 12:11
Re: Das geht doch bestimmt besser519Vento04.08.05 13:43
Re: Das geht doch bestimmt besser620Urot04.08.05 13:59
Re: Das geht doch bestimmt besser555Vento04.08.05 14:12

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel