Hallo,
wie kann ich eine Checkbox mit einer Textbox vergleichen?
Folgendes liefert immer "nein", obwohl die Caption der Checkbox und der Inhalt der Textbox gleich sind. (Checkbox hat eine Auswahl per Formel und es steht ein einzellner Feldname drin. Gleicher Feldname steht als Vorgabewert für die Textbox. Daher müsste der Vergleich ja auch wahr sein).
Sub Queryclose(Source As Notesuidocument, Continue As Variant)
Dim doc As NotesDocument
Set doc = source.Document
If Cstr(doc.chk1(0)) = Cstr(doc.txt1(0)) Then
Messagebox "ja"
Else
Messagebox "nein"
End If
End Sub