VB问题,一个简单的编程!

来源:百度知道 编辑:UC知道 时间:2024/07/04 15:02:00
想做个登录界面!只会if text1.text="**"语句!还有什么更好的吗?另外想做个注册,用二维数组好像只能在当前窗口下(和登录界面同窗体)才可以。而且多注册的话好像密码都是最后注册的那个了!这个问题困扰我很久了,希望高手来个源码,复杂的语句后面加个解释!谢谢了!

为何不用数据库,将登录用户名和密码放入数据库中,这样即安全又方便用户管理。假设用ACCESS数据库,用户表为UsrLog。用VB6制作,代码如下:
dim cn as adodb.connection
dim rs as adodb.recordset
sub login()
dim tSql as string
set cn=new adodb.connection
cn.open "Driver={Microsoft Access Driver (*.mdb);Dbq=Users.mdb};Uid=Admin;Pwd="
tsql="Select UsrName,UsrPass From UsrLog Where UsrName='"+txtUser.text+"'"
set rs=new adodb.recordset
rs.open tsql,cn,4,2
if rs.recordcount>0 then
if rs.fields(1)=txtPass.text then
'登录成功
...
else
msgbox "用户密码不正确",vbokonly,"提示"
set rs=nothing
end if
else
msgbox "用户名不存在",vbokonly,"提示"
set rs=nothing
end if
set rs=nothing
set cn=nothing
end sub

晕 兄弟你应该用vb.net 语言

建议你到源码站上多看看

还有就是多注意读书 勤加思考 ...

不要有一点问题就搞到百度上来

多注意读书 勤加思考 ...

不要有一