Procedure LOGAR . . . oSenha = CreateObj ("frmSenha") oSenha.Show () . . . EndProc && LOGARonde, mais adiante no mesmo prg (observe que você não pode ter procedimentos comuns após "defines" de classes):
Define Class frmSenha as Form . . . EndDefine
Procedure LOGAR . . . If PedeSenha () . . . endif . . . EndProc && LOGARE na procedure PedeSenha você faz o tratamento do form, que pode ser criado visualmente ou programaticamente.