Vraag : Visuele Basis - datagridview winst 2 rijen voor enige gegevensbestandingang

Hallo, keert
met een bepaalde bedoeling mijn datagridview 2 rijen voor elke enige gegevensbestandingang terug en ik weet niet waarom, dit mijn code is:

Dim conn als MySqlConnection
Schemerige MyCommand1 als Nieuwe MySqlCommand
Schemerige MyBuilder als Nieuwe MySqlCommandBuilder
„Schemerige conn als/> Schemerige myAdapter MySqlConnection
Schemerige MyDataTable als Nieuwe DataTable
conn = Nieuwe MySqlConnection ()
conn.ConnectionString = „server=server; gebruiker - identiteitskaart =user; password=pass; database=dbname "

Try
conn. Open ()/> myerror van de Vangst

Try



als van MySqlException
MsgBox („Fout die met Gegevensbestand“ verbinden) MyCommand1.CommandText = „SELECTEERT * UIT cots_storeusers WAAR Postcode =“ „+ txtpostcodelookup. Tekst +“ „OF Telefoon =““ + txtpostcodelookup. Tekst + „'„
MyCommand1.Connection = conn
myAdapter.SelectCommand = MyCommand1
myAdapter.Fill (MyDataTable)
DataGridView1.DataSource = MyDataTable

als MyDataTable.Rows.Count = 0 Then
MsgBox („Droevig - ik kan niet vinden dat de postcode in het gegevensbestand, gelieve, opnieuw te proberen of toe te voegt een nieuwe klant onder…“)
txtpostcodelookup. Tekst = ""

Else
txtpostcodelookup. De tekst = ""
myAdapter.Fill (MyDataTable)
DataGridView1.DataSource = het Eind If


this van MyDataTable

is wat het net bevolkt:

myAdapter.Fill (MyDataTable)
DataGridView1.DataSource = MyDataTable

What ben verkeerd doen van I?

Thanks

Antwoord : Visuele Basis - datagridview winst 2 rijen voor enige gegevensbestandingang

Hallo,
   Ik slaagde erin om het te bevestigen, merkte op ik ik dubbele lijnen van code had:

myAdapter.Fill (MyDataTable)
        DataGridView1.DataSource = MyDataTable

        Als MyDataTable.Rows.Count = 0 toen
            MsgBox („Droevig - ik kan niet vinden dat de postcode in het gegevensbestand, gelieve opnieuw, te proberen of hieronder een nieuwe klant…“ toe te voegt)
            txtpostcodelookup. Tekst = ""

        Anders
            txtpostcodelookup. Tekst = ""
            myAdapter.Fill (MyDataTable)
            DataGridView1.DataSource = MyDataTable


Als u opmerkt ik heb vullen twee op mijn temperaturenlijst:

myAdapter.Fill (MyDataTable)

Dank hoe dan ook, maar ik sorteerde het zelf!