vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
TOP-Angebot: 17 bzw. 24 Entwickler-Vollversionen zum unschlagbaren Preis!  
 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 & Datenbanken
MSFlexGrid problem !!!  
Autor: Der_Designer
Datum: 22.04.04 18:59

Hallo Leute,

ich hab da ein problem. Ich habe auf meiner Form ein MSFlexGrid, welches mit einer Datenbank verbunden ist.

Nun kann ich in dem Grid mit den Cursortasten Zeilenweise auf und ab wandern. Und wenn ich dann die Entertaste drücke, sollen die aktuell markierten Daten in ein Label übernommen werden.

Das übernehmen funktioniert, allerdings nimmt er immer nur den obersten Eintrag aus dem Grid und nicht den ausgewählten.

Hier mein Code zur übernahme:

Private Sub MSFlexGrid1_KeyPress(keyascii As Integer)
 
  If keyascii = 13 Then 
    keyascii = 0
 
 
    With frmartikel
        .txtartikelnummer.Text = Data1.Recordset.Fields("Artikelnummer")
        .txtartikel.Text = Data1.Recordset.Fields("Artikel")
        .txtstückpreis.Text = Data1.Recordset.Fields("Stückpreis")
    End With
 
  End If
 
  txtmenge.SetFocus
 
End Sub
Was mache ich hier falsch ? Ist es nicht so, das der markierte Datensatz im Grid auch der aktuell Markierte in der Tabelle ist ?

Vielen Dank im Vorraus

Der_Designer

Ultra posse nemo obligatur.
(Niemand ist verpflichtet mehr zu leisten als er kann)

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
MSFlexGrid problem !!! 650Der_Designer22.04.04 18:59

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