Office: (Office 2010) Abfrage Textfeld leer

Hallo liebe Access-Gemeinde
In einer Ereignisprozedur soll eine Meldung erstellt, falls im TEXT-Feld "Notizen1" in der Abfrage "NotizenAbfrage" etwas drin steht.

Mein Code ist:
Private Sub Form_Open(Cancel As Integer)
If Not IsNull("[Notizen1]![NotizenAbfrage]") Then
MsgBox "Notizen beachten", vbOKOnly, ""
End If
End Sub

Aber jetzt kommt die MessageBox immer, egal ob im Feld Notizen1 etwas steht oder nicht. Schreibe ich im Code:
If isNull
dann kommt die MessageBox nie.
Wie muss ich das machen?

:)

 

Probier mal folgendes:

If Not IsNull([Notizen1]![NotizenAbfrage]) Then

Also, die Anführungszeichen weglassen, da Texte in Anführungszeichen normalerweise als Literale und nicht als Feldnamen interpretiert werden.

Gruß
ChiliHead

 

Hier geht es begrifflich arg durcheinander.

In einer Abfrage gibt es keine Ereignisse und somit auch keine Möglichkeit, Ereignisprozeduren auszuführen. Die Wert-Abfrage eines Feldes in dieser Abfrage sähe dann auch ganz anders aus.

In einem Formular ist das Textfeld Steuerelement des Formulars. Das sollte man auch im Code erkennen können:
Code:

 

Zwischenfrage: Geht das überhaupt, das ein Textfeld NULL sein kann? Soviel ich weiß, können in VBA nur Variant-Variablen NULL enthalten. Textfelder liefern immer einen Sting, falls sie leer sind eben einen Leerstring ="" zurück.

 

Nein. Eine Textbox ist vom Typ Variant.
Wenn man das Textfeld an ein Tabellenfeld bindet, übernimmt es die Eigenschaften des Tabellenfeldes.
Wenn man ein ungebundenes Textfeld formatiert, übernimmt es Eigenschaften aus dieser Formatierung, z.B. kann bei einem Format "Datum, kurz" eben nur noch ein gültiges Datum eingetragen werden.

Im Zweifelsfall könnte man also abfragen:
Code:

 

War mir da nicht mehr so sicher. Ist schon ne Weile her seit ich VB/VBA programmiert habe. In der letzten Zeit nur noch .NET und da sind TextBoxen immer String. Auch die implizierte Typenumwandlung geht da nicht mehr so leicht (bzw. man sollte sie eh komplett deaktivieren) und Variant gibts auch nicht mehr (zum Glück!!)

Gruß
ChiliHead

 

Der Code mit
If Not IsNull(Me.Notizen1) Then
wie auch:
If Len("" & Me.Notizen1) > 0 Then
funktionieren bestens.

Ich war der Ansicht, im Code muss sicher auch der Name der Abfrage stehen, aber den braucht es gar nicht wie es aussieht.
Auf euch ist Verlass! Besten Dank