Description

Replaces a series of options (answers).

Remarks

If you define an options script, the user cannot choose an answer from a predefined list of answers (options) himself. The answer is determined by the script. The result of this script must be places in the reserved parameter Antwoord.

Example

' Any script routines are valid

' Function does expect a string result

Dim Query

Query = Application.DataBase.CreateQuery( "Select CountryCode Land from country" )

Query.Open

if Query.LookUp("Find a country","Country") then

Antwoord = Query("Country").Value

else

Antwoord = AntwoordOpVraag("K01")

end if

Query.Close