>Yes I think prompt() would work except I can't figure out where to put it.
>
>Tyler
What about

DO Myform WITH PROMPT()

Myform.Init
LPARAMETERS tcPrompt

DO CASE
CASE Upper(tcPrompt) = Upper("Menu Selection 1")
    This.Caption = "Caption 1"
    .....
OTHERWISE
ENDCASE