PB自动退出解决思路

PB自动退出
我做了一个登陆的界面 运行的时候一按登陆那个按键 整个PB就自动退出 请各位高手给我解答一下 谢谢~
------解决方案--------------------
登录按钮里面怎么写的呢
------解决方案--------------------
估计是致命问题，引用非法内存地址~
------解决方案--------------------
原因很多，大多是代码的问题
------解决方案--------------------
看上去写的没问题。PB打补丁试试
------解决方案--------------------
//cb_1.triggerevent(clicked!)

string ls_mcode
string ls_mpsd
string gs_mpsd

ls_mcode=sle_1.text
ls_mpsd=sle_2.text

select mpsd into :gs_mpsd
from "用户表"
where mcode=:ls_mcode;

if gs_mpsd=ls_mpsd then
messagebox("系统提示","登陆成功!")
open(em_begin)
close(em_login)
else
messagebox("系统提示","密码错误，请重新输入!")
sle_1.text=""
sle_2.text=""
sle_1.setfocus()
end if