Wie kann ich die Referenz der aktuellen form in einen Ausdruck in Microsoft Access?

Ich bin kein Access-Experte, und ich habe ein (hoffe ich!) einfache Frage...

Ich habe ein Formular mit einer Anzahl von Datensätzen. In einige Textfelder, die ich nur Werte aus der zugrunde liegenden Tabelle - so sind Sie verpflichtet, die entsprechenden Felder ein.

Aber einige Textfelder enthalten berechnete Werte. Einige Berechnungen sind kompliziert und beinhaltet viele Felder aus der Tabelle. Ich Schreibe die Berechnung als eine VBA-Funktion. Ich könnte geben Sie so etwas wie "Kontrolle Quelle":

=MyFunction([Field1], [Field2], [Field3] ...)

Aber ich will keine Liste mit Dutzenden von Feldern in der Funktion nennen. Stattdessen möchte ich das ganze schicken form (oder der aktuelle Datensatz) als parameter, und lassen Sie die Funktion auf die Felder verweisen, die es braucht. Kann ich es so machen:

=MyFunction([Forms]![MyForm])

Aber ich mag es nicht, um den Namen der form in dem Aufruf. Gibt es nicht eine Möglichkeit zum senden der "derzeitigen form" als Funktionsargument? In VBA verwenden Sie einfach das "Me" - Schlüsselwort, für exampel "Mich![Feld1]". Aber es scheint, wie "Mich" nicht akzeptiert in einem Ausdruck.

Gibt es eine andere Möglichkeit zum verweisen auf die aktuelle form in einem Ausdruck?

(Es ist eine kosmetische Frage, ich weiß. Aber es ist nicht gut programmiert ist, zu verwenden "[Form]![Meinformular]". Später kopieren Sie die Steuerelemente in einem anderen Formular und vergessen den Namen zu ändern in den Ausdruck...)

Dankbar für Eure Hilfe! 🙂

/Anders

InformationsquelleAutor UglySwede | 2012-01-09
  1. 9

    Können Sie verwenden:

    =MyFunction([Form])

    Würde der code sein:

    Function MyFunction(frm As Form)
MsgBox frm.Name
End Function
    InformationsquelleAutor Fionnuala
  2. 5

    "ich" kann nur aufgerufen werden, innerhalb des entsprechenden Formular-Objekt, (dh in der Objekt-Prozeduren, Funktionen und Ereignisse).

    Meine Lieblings-Weg zu finden, um die aktuelle form ist der Aufruf der Bildschirm.activeForm-Objekt...

    screen.activeForm.recordset.fields(myFieldname).value
screen.activeForm.controls(myControl).value
screen.activeForm.name
....

    Natürlich können Sie das form-Objekt eine benutzerdefinierte Funktion

    my Result = myCustomFunction(screen.activeForm)

    Oder Sie könnten bauen ein Benutzer-definiertes Objekt. Die benötigten Felder könnten dann als interne Eigenschaften, stellen in der sub Class_Initialize des entsprechenden Objekts.

    • Screen.ActiveForm.Name verwendet werden können, in eine Globale Funktion! Vielen Dank dafür!
    • Ich denke, das sollte als "Antwort" gekennzeichnet, da es funktionieren wird, das Ziel zu erreichen, die in weit mehr Situationen, als durch die form-name als parameter, und eliminiert die Notwendigkeit ein parameter übergeben, an alle-auch übersichtlicher, weniger verwirrenden code. Großes Lob an Philippe Grondier! Dies löste ein problem, ich war Adressierung sehr ordentlich.
    InformationsquelleAutor Philippe Grondier
  3. 3

    Wenn Sie mithilfe von code in der form, dann "ich" - Referenz auf das aktuelle Formular. So

    Call SomeFunction(me)

    Jedoch, "ich" kann nicht verwendet werden, die im Kontext eines Ausdrucks, der gebunden ist, um ein Textfeld.

    In diesem Fall können Sie entweder abholen der aktuelle Bildschirm in die routine mit Bildschirm.activeform wie vorgeschlagen.

    Oft gehe ich:

    Dim f     as form
Set f = screen.ActiveForm
    • Es ist durchaus möglich, um ein Ereignis oder sogar die Kontrolle Quelle eines Objekts, einer Funktion verwenden Sie das Eigenschaftenblatt für das Steuerelement, wie ich bin sicher, Sie wissen, und in diesem Fall =AFunction([Form]) können sehr nützlich sein. Es ist besonders nützlich, wenn Sie möchten, Ausschneiden und einfügen eines Steuerelements an mehrere Formen. Ich glaube, es ist diese Funktion, dass die OP wurde in Erwägung.
    • Donnerwetter, ich hatte keine Ahnung, dass [Form] eingesetzt werden könnten, Stelle das Schlüsselwort [mich] in einem Ausdruck. Das hat tatsächlich funktioniert und geht der name des Formulars und nicht so ohne harte Codierung. Dieser Tipp sicherlich eröffnet einige Möglichkeiten, die ich nicht bewusst war.
    • Ja, ich wusste nicht, dass die "Form" in einem Ausdruck wurde Analog zu der "Me" - Schlüsselwort in VBA. Sehr praktisch. Ich kann nicht scheinen, um herauszufinden, Dokumentation von dieser Technik, aber es funktioniert!
    InformationsquelleAutor Albert D. Kallal
  4. 1
    Screen.ActiveControl.Parent
' or
someControlVariable.Parent

    Ich benutze diese, wenn ich möchte das aktuelle Unterformular (oder Formular aus, wenn nicht gerade in einem Unterformular), weil mit Screen.ActiveForm nicht die aktuelle Unterformular, sondern nur das Formular mit dem Unterformular. Bitte seien Sie sich bewusst von Ihrem Kontext, wenn sich das Steuerelement in einem Registersteuerelement, dann seine Eltern wird das Register-Steuerelement und nicht die form.

    InformationsquelleAutor Jeremy Cook
  5. 0

    In ACC2013 ich nicht nutzen konnte fionnuala's Antwort. Also wechselte ich zu:

    Event-handler im Eigenschaft-Fenster:

    =MyFunction()

    Mein code wäre:

    Function MyFunction()
  Dim frm As Form   
  Set frm = Screen.ActiveForm
  MsgBox frm.Name
End Function
    • Wie bereits erwähnt, Sie können gehen "ich" oder [Formular], ubt haben Sie zu ersetzen, "[Formular]" mit dem tatsächlichen Namen des Formulars. So fionnuala Antwort wird funktionieren, aber Sie NIE verwenden Sie [Form], aber ersetzen Formular mit dem Formular einen Namen (z.B. FORMEN!SomeFormName. Ich denke, dass es am besten zu pass "mir" zu den Routinen da dann der code ordnungsgemäß laufen kann von einer form in dem Fall, dass eine andere form gestartet wird oder bekommt die focues dann Ihren code wird nicht abholen, die falsch ist. Aber Sie Screen benutzen.ActiveForm ist ok.
    • Warum ist es ein problem mit [Formular] im Ausdrucks-generator? Ist ActiveForm auch eine option in diesem Fall? Ich sehe einen Nachteil explizit über die form der Namen, da diese Namen ändern können, oder möchten Sie vielleicht, um zu stehlen eine form der Ausdrücke oder code, aber verwenden Sie einen anderen Namen für das Formular.
    InformationsquelleAutor DevMasterBob
Schreibe einen Kommentar