Shoutbox

I believe "Form.Show vbModal" returns only after the form is hided or unloaded, Choli


Well, this might work:

' inside parsecommand...
not_yet=true ' this is a global variable
form1.show vbmodeless, screen.activeform
while not_yet
DoEvents ' You don't want to hang Messenger here, don't you
wend
sResult = Form1.text1.text
end function

'inside form1...
sub commandbutton_enter_onclick()
not_yet = False
end sub