Zobrazení podformuláře na základě stavu nějakého pole

Výpočet pro vypočtené podformuláře se provádí v události Open, takže jakmile formulář je otevřen, nemůžeme změnit podformulář na základě stavu nějakého pole.

Vytvořte formulář (může být výchozím)
Vytvoření požadovaného pole či akce
Chceme otevřít podformulář založen na výběru hodnoty daného pole (tlačítka atp.)
Vložte následující kód do onExit (onClick), popřípadě do akce.

Dim ws As New NotesUIWorkspace

Dim uidoc As NotesUIDocument

Dim new_uidoc As NotesUIDocument

Dim doc NotesDocument

Set uidoc = workspace.CurrentDocument

Set doc = uidoc.Document

Call doc.computewithform (True, False)

Call Workspace.SetTargetFrame ("")

Set new_uidoc = Workspace.editdocument (True, doc)

uidoc.document.saveoptions = "0"

Call uidoc.close

'Obnovit dokument

Call new_uidoc.reload

Call new_uidoc.refresh

Tento kód mě zatím za žádných okolností nezklamal.