Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Focus auf Formular setzen

495 views
Skip to first unread message

Peter Witt

unread,
Jun 10, 2004, 9:52:54 AM6/10/04
to
Hallo,
ich habe ein Formular (VERKAUF) das über einen Button eine Prozedur aufruft
die Daten (z.B Name) aus dem Feld eines anderen Formular entnimmt. Wen der
Benutzer alles richtig macht ist das kein Problem. Den Fehler der entsteht
wen er es falsch macht habe ich abgefangen indem der Button eine Funktion
aufruft die prüft ob das Form (KUNDEN) geladen ist. Wenn nicht lädt die
Prozedur das Form.
Hier das Problem, wenn das Form (KUNDEN)nachgeladen wird ist es zwar
geöffnet aber das Form(VERKAUF), aus dem die Prozedur aufgerufen wurde,
steht immer noch im Vordergrund, es hat den Focus.
Wie kann ich den Focus auf das Form(KUNDEN) setzen.
Mein Schnipsel:
If fct_IsFormOpen("frm_Kunden1") > 0 Then
"tu was"
Else
DoCmd.OpenForm "frm_Kunden1", acNormal

MsgBox ("Wählen Sie erst den Kunden aus, und geben Sie KommNr.und
Verkaufsdaten ein"), vbOKOnly

End If


Gruß Peter


Karl Donaubauer

unread,
Jun 10, 2004, 12:19:59 PM6/10/04
to
Peter Witt wrote:
> ...wenn das Form (KUNDEN)nachgeladen wird ist es zwar

> geöffnet aber das Form(VERKAUF), aus dem die Prozedur aufgerufen
> wurde, steht immer noch im Vordergrund, es hat den Focus.
> Wie kann ich den Focus auf das Form(KUNDEN) setzen.
> Mein Schnipsel:
> If fct_IsFormOpen("frm_Kunden1") > 0 Then
> "tu was"
>...

Vermutlich meinst du mit "Form(KUNDEN)" das im Code
abgefragte "frm_Kunden1". Versuch's mal mit Fokus-Setzen:
Forms!frm_Kunden1.SetFocus
oder auf's 1. Steuerelement im frm_Kunden1
Forms!frm_Kunden1!DeinSteuerelement.SetFocus

--
HTH
Karl
********* Ich beantworte keine Access-Fragen per Email. *********
Access-FAQ: http://www.donkarl.com
+ Info zur 7. AEK = Access-Entwickler-Konferenz 25./26.9.2004


Peter Witt

unread,
Jun 10, 2004, 2:03:55 PM6/10/04
to

"Karl Donaubauer" <NoS...@donkarl.com> schrieb im Newsbeitrag
news:2irg9bF...@uni-berlin.de...

> Vermutlich meinst du mit "Form(KUNDEN)" das im Code
> abgefragte "frm_Kunden1". Versuch's mal mit Fokus-Setzen:
> Forms!frm_Kunden1.SetFocus
> oder auf's 1. Steuerelement im frm_Kunden1
> Forms!frm_Kunden1!DeinSteuerelement.SetFocus
>

Hallo Karl,
das habe ich bereits probiert, das Problem schein die Message Box zu sein.
Immer wenn man das OK klickt wird das Form aktiv in dem der Ursprung der
MsgBox liegt. Leider weis ich nicht wie man auf das Resultat der MsgBox
reagiert, daran könnte man das SetFocus anbauen, ich suche da ein Beispiel,
hab aber noch nichts gefunden.

Gruß Peter


Jens Schilling

unread,
Jun 10, 2004, 2:33:30 PM6/10/04
to
Hallo, Peter

> Leider weis ich nicht wie man auf das Resultat der MsgBox
> reagiert, daran könnte man das SetFocus anbauen, ich suche da ein
>Beispiel, hab aber noch nichts gefunden.

Probier doch 'mal :

If MsgBox("Deine Meldung", vbOKCancel, "Dein Titel") = vbok Then
Dein Code.....
End if

HTH
Gruß aus Winsen
Jens

Peter Witt

unread,
Jun 10, 2004, 4:33:17 PM6/10/04
to
Hallo Jens,
danke, leider hilft das auch nicht, jedoch ist mir die Methode nun klar. Ich
werde mir nun das Screen Objekt näher ansehen, vielleicht finde ich hier die
Lösung.
Gruß
Peter


0 new messages