Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Mehrere ComboBoxen auf Inhalt abfragen
Autor: Frondienstler
Datum: 26.06.03 09:43
Klasse, klappt astrein! Einziges Problem ist, daß das nicht ausgefüllte Feld nicht den Focus bekommt, sondern der Focus verschwindet. Die Abfrage wird gestartet durch ein Command-Button. Ist alles korrekt ausgefüllt, mache ich Form2 sichtbar, andernfalls soll der weitere Programmablauf gestoppt werden (exit sub), Form1 sichtbar sein und das fehlende Feld den Focus bekommen. Private Sub cmdDruck_Click() Dim oControl As Control For Each oControl In Form1 If TypeOf oControl Is ComboBox Then If oControl.ListIndex < 0 Then MsgBox "Bitte ALLE auswählen!", vbCritical, "Fehler!" Form1.Visible = True Form2.Visible = False oControl.SetFocus Exit Sub Exit For End If End If Next Form2.lblTechniker.Caption = Form1.cboTechniker.Text Form2.lblDatum.Caption = Form1.txtDatum.Text Form2.lblNummer.Caption = Form1.txtNummer.Text Form2.lblBauzeit.Caption = Form1.cboBauzeit.Text Form2.lblFirma.Caption = Form1.txtFirma.Text end sub

Mehrere ComboBoxen auf Inhalt abfragen	104	Frondienstler	26.06.03 08:57
Re: Mehrere ComboBoxen auf Inhalt abfragen	693	Dieter	26.06.03 09:08
Re: Mehrere ComboBoxen auf Inhalt abfragen	61	Frondienstler	26.06.03 09:43
Re: Mehrere ComboBoxen auf Inhalt abfragen	1.078	Dieter	26.06.03 09:58
Re: Mehrere ComboBoxen auf Inhalt abfragen	57	Frondienstler	26.06.03 10:37
Re: Mehrere ComboBoxen auf Inhalt abfragen	695	Dieter	26.06.03 11:04

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übersicht

Suchen