functionalities like [OKCancelList] and [OkCancelCombo].However there is a
workaround for this
1.Create a form called Layout.Create a Layout region in this with 3d Background
2.Create a field called Keys of type text,Editable and "Allow Multi values"
check box enebled
3.Have a Keywords field called Keyword and choose "Enter Formula For Keywords"
option..Enter "Keys" as formula.
4.Now include the script in the place you want to simulate the @prompt function
5.you can access the selected option by accessing the Keyword field in the
temporary document created for this purpose(Refer the code)
Dim ws As New NotesUIWorkspace
Dim ses As New NotesSession
Dim tempdoc As New NotesDocument(ses.CurrentDatabase)
Dim ch(5) As Variant
'Enter the list of keywords as'individual elements of Ch array.
'First element is the default value
ch(0) ="default"
ch(1) ="a"
ch(2) ="b"
ch(3) ="c"
tempdoc.Keys = ch
Call ws.DialogBox ("layout",True,True,False,_
False,False,False"Dialog Box",tempdoc)
'tempdoc.keyword(0) returns the selected option...use it for further processing
This was first published in November 2000