| 发表于:2007-01-19 12:40:57 楼主 |
private sub btnok_click(byval sender as system.object, byval e as system.eventargs) handles btnok.click tbluser = glsdb.opentable( "select * from [user] where username= " & " ' " & me.txtusername.text.tostring & " ' ") if tbluser.rows.count > 0 then '密码正确 if tbluser.rows(0).item(1).tostring = trim(me.txtpassword.text.tostring) then if (frmmain is nothing) orelse (frmain.isdisposed) then frmain = new frmmain end if frmain.show() me.close() end if else msgbox( "无此用户名,请重新输入 ") return end if 运行后,整个程序都关了呢 |
|
|
|
|