I found this code/answer posted by Qwaletee to set up an Ok button and Queryclose in Dialogbox How would it be modified to make sure that fields are filled in? May be more than one field:
Set up your own OK button. The OK button has code as follows:
Dim ws As New notesUiWorkspace
ws.currentDocument.document.tempValueAllowClose = "1"
The QueryClose code is:
If Source.document.tempValueAllowClose(0) <> "1" Then
Continue = False
Source.document.tempValueAllowClose = "0"
Use NoOKCancel to call the dialog box.
Now, if the users hit your OK button, it works. If they hit X, Notes just beeps as them