Thanks for responding.
>So what line does it stop on? Or does it actually get to x = 1? What happens next?
>
It runs the init method then exists the form, that is it gets to x = 1 and then exits the form.
>Why not just set a breakpoint at the 1st line of Init() and watch what happens in debug (or are you still on VFP3)?
>
I used the debugger to find out what was happening, I set a break point in the program which invokes it. I am using VFP 9.
>UIt's likely that till Init() is done, the form doesn't "know" its objects, such as Thisform.lblErrorMsg.
So what do I do now?
>
>>I have a program that executes a login form. If I run the form it works as expected. If I run the form form for the program "DO FORM login" it stops at the init method which has the following code in it
>>
>>PUBLIC gnuseridcnt , gnpasswordcnt , lcweekday
>>LOCAL x
>>
>>gnuseridcnt = 0
>>gnpasswordcnt = 0
>>gnUserLev = 0
>>m.glValid = .F.
>>
>>Thisform.lblErrorMsg.Caption = ''
>>Thisform.lbltoday.Caption = 'Today is ' + CDOW(DATE()) + ', ' + ;
>> CMONTH(DATE()) + ' ' + STR(DAY(DATE()),2) + ', ' + STR(YEAR(DATE()),4)
>>Thisform.lblPC.Caption = 'You are using a ' + SYS(17) + ' PC'
>>
>>IF ! USED('sysuse')
>> USE (gcDATA) + '\sysuse' ORDER TAG cid ALIAS sysuse
>> SELECT sysuse
>>ELSE
>> SELECT sysuse
>> SET ORDER TO TAG cid
>>ENDIF
>>
>>x = 1
>>
>>I can add the "DODEFAUL()" command with out any change in behavior. The x = 1 is there so I could have a place to stop in the debugger.
>>
>>I am stumped. Any help appreciated.