各位高手请看看，怎样用程序的过程控制表单控件？？？

bingo2000 2002-12-17 12:30:27

请问怎样用程序的过程控制表单控件？？？
我想用一个主程序控制表单控件，开始用do form调入表，然后用程序里面的过程控制表单控件，例如

use bb ORDE TAG BH
GO TOP
do form Main_admin
close data
retu

PROC MYPASS
word_1=allt(TEXT1.value)
word_2=allt(TEXT2.value)
loca for allt(xm)=allt(word_1)
DO case
case word_1==""
messagebox("对不起！请重新输入",0+48+0,"注意")
.TEXT1.setfocus
retu
case found()=.f.
messagebox("对不起！请重新输入管理员名",0+48+0,"注意")
.TEXT1.value=""
.TEXT2.value=""
.TEXT1.setfocus
retu
case word_2=allt(bh)
messagebox("对不起！请重新输入密码",0+48+0,"注意")
.TEXT2.value=""
.TEXT2.setfocus
retu
otherwise
messagebox("通过",0+48+0,"注意")
retu
ENDCASE
RETU
如后在控件了面调用过程，
如对按钮的 click
WITH THISFORM
=mypass（）
endwith
问题是为什么程序老是提示找不到mypass.prg的？？

...全文