设计一个简单的登录界面 就是不知怎么开始
可以采用JDBC+JSP+JAVABEAN来实现一个登录操作
具体步骤是：先画一个html登录的页面，用JDBC来连接数据库，再编一个JAVA类控制页面输出。具体代码上网搜一下，很多。用VISUAL BASIC 6.0 ， 启动后选中 文本框控件和 按钮控件。从左侧工具栏拖到工图标 png作区就OK了。
怎么用VB设计一个登陆界面？
1.首先添加2个label控件，一个caption为用户名，一个为密码然后分别在2个label控件后面添加一个text控件，
2.将text的text属性设置为空再添加2个button按钮，一个名为登陆，一个名为取消简要代码如下：
private sub text2_change() sswordchar=”*”end subprivate sub button1_click()if text1.text=”text” and text2.text=”123456″ then ‘这里写验证代码… ‘通过验证后要干么elsemsgbox(“用户名或者密码不正确！”)end if end subprivate sub button2_click()endend sub用vb新建一个工程，在窗体form1上画两个label控件，一个是label1一个是label2，把label1的caption属性设为“用户名”，label2的caption属性设为“密码”，然后分别在这俩label右边各画一个textbox控件，一个叫text1，一个叫text2，把text2的passwordchar属性设为“*”，同时把两个textbox的text属性设为空（就是都清空），然后在窗体的下部合适的位置画两个commandbutton控件，一个叫command1，另一个叫command2，分别设置他们的caption属性为“确定”和“取消”。
界面就画完了，下面是代码。
先点菜单项里的工程下面的引用，找到activex data objects 2.6或以上版本的类库，选中前面的对勾，然后确定，该操作是用来引用ado对象的。
双击确定按钮，写入以下代码。
dim conn as new adodb.connection
dim rs as new adodb.recordset
if text1.text=”” or text2.text=”” then
msgbox “对不起，用户名与密码不能为空”,vbinformation,”输入错误”
exit sub
end if
conn.connectionstring=”provider=microsoft.jet.oledb.4.0;data source=(这里去掉括号写入你的数据库文件路径形如：c:aaabbb.mdb，这是access数据库的用法);persist security info=false”
conn.open
rs.open “select * from tbl_user where username='” & text1.text & “‘ and password='” & text2.text & “‘”,conn,3,3
if rs.recordcount<>0 then
‘此处加入登录完成后要执行的操作，如果是要显示form2则参考下文
load form2
form2.show
rs.close
conn.close
unload me
else
‘此处为密码验证失败。
msgbox “对不起，登录失败”,vbinforamtion,”提示”
rs.close;
conn.close;
exit sub
end if
实现以上代码需要有一个用来连接的数据库，里面起码要有一张名为tbl_user的表，里边起码有两个字段，一个叫username，一个叫password，如果是access库，则都设为“文本”类型，如果是sql库，则都设为varchar或nvarchar类型，还要把上面代码的连接字串修改，连接字串的获取方法很简单，你在任何路径下新建一个文本文件（记事本文件），把基扩展名改为udl，然后双击打开，按提示设置好后，再用记事本打开该文件，最后一行内容即为连接字串。
至于修改的话你可以给我邮箱里发邮件我给你详细代码。太长了这里贴出来容易出问题。[email protected]
相关文章
