none
Brauche Hilfe-> Suche im DataTable. RRS feed

  • Frage

  • Hallo,

    Habe ein DataSet mit mehreren DataTables. Muss in einem DataTable „sollwerte“ mit mehreren Spalten und Zeilen bestimmte Werte raussuchen und anzeigen, z.B. Tabelle „sollwerte“ hat Spalten  „Modell“, „Hub“, „Geschwindigkeit“...  ein bestimmtes Modell (was nur einmal vorkommt)  habe ich im ComboBox stehen, es ist so zu sagen mein Suchbegriff und ich muss in Zeile mit diesem Modell ein Wert , was in Spalte „Hub“ steht auslesen und anzeigen...   irgendwie klappt’s nicht..

    Vielen Dank im Voraus))

    Public Class Form1
      
      
      Private typ_binding As BindingSource
      Private modell_binding As BindingSource
      Private verbindung As String = "Provider=Microsoft.SQLSERVER.CE.OLEDB.3.5;Data Source=MyDatabase#3.sdf;"
      Private conn_1 As OleDbConnection
      Private typ_suche As String = "SELECT Typ,Typ_Nr FROM T_Typ"
      Private modell_suche As String = "SELECT Typ,Modell FROM T_Haupttabelle"
      Private sollwerte_suche As String = "SELECT * FROM T_Haupttabelle"
      Private typ_adapter, modell_adapter, sollwerte_adapter As OleDbDataAdapter
      Dim auswahl_set As New DataSet("Auswahl")
      Dim sollwerte_table As New DataTable
      Dim sollwerte_view As New DataView
    
        auswahl_set.Relations.Add("typ_modell", auswahl_set.Tables("der_typ").Columns("Typ_Nr"), auswahl_set.Tables("das_modell").Columns("Typ"))
    
        Dim typ_bindung As New BindingSource(auswahl_set, "der_typ")
    
        cb_typ.DataSource = typ_bindung
        cb_typ.DisplayMember = "Typ"
    
        Dim model_bindung As New BindingSource(typ_bindung, "typ_modell")
    
        cb_modell.DataSource = model_bindung
        cb_modell.DisplayMember = "Modell"
     Private Sub cb_modell_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cb_modell.SelectedIndexChanged
    
        Dim sollwerte_table As DataTable = auswahl_set.Tables("sollwerte")
    
        Dim sollwerte_view As New DataView(sollwerte_table)
    
        ''TextBox1.Text = sollwerte_view(cb_modell.SelectedIndex).Row(cb_modell.SelectedIndex).ToString
        ''TextBox1.Text = sollwerte_view(cb_modell.SelectedIndex).Row("Geschw_Ein").ToString
        TextBox1.Text = sollwerte_view(cb_modell.SelectedIndex).Row("Hub").ToString
    
    
    
    
    
    
    
    
    
      End Sub
    
    

    Freitag, 1. Oktober 2010 15:48

Antworten

  • Hallo,

    Habe ein DataSet mit mehreren DataTables. Muss in einem
    DataTable "sollwerte" mit mehreren Spalten und Zeilen bestimmte
    Werte raussuchen und anzeigen, z.B. Tabelle "sollwerte" hat
    Spalten "Modell", "Hub", "Geschwindigkeit"... ein bestimmtes
    Modell (was nur einmal vorkommt) habe ich im ComboBox
    stehen, es ist so zu sagen mein Suchbegriff und ich muss in
    Zeile mit diesem Modell ein Wert , was in Spalte "Hub" steht
    auslesen und anzeigen... irgendwie klappt's nicht..

    Auch nach mehrmaligem Lesen dieses Satzes kann ich
    nicht behaupt, wirklich verstanden zu haben, was Du
    machen möchtest.

    Ich rate jetzt einfach mal, dass Du aus einer DataTable in
    der es eine Spalte (Column) mit eindeutigen Werten gibt,
    einen bestimmten Datensatz herausfinden möchtest.

    Hierzu findest Du ein Beispiel unter

        www.gssg.de -> Visual Basic -> VB.net
            -> DataTable / DataView / CurrencaManager
                -> DataTable with PrimaryKey

    Bei diesem Beispiel kann man einen Suchbegriff (LCID) in einer
    Textbox eingeben. Durch einen Klick auf den Button "Find Record"
    wird nach dem Datensatz mit dieser LCID gesucht.

    Gruß aus St.Georgen
    Peter Götz
    www.gssg.de (mit VB-Tipps u. Beispielprogrammen)

    Freitag, 1. Oktober 2010 18:09