一、开发工具：VB+SQL
二、开发期限：2011年
三、相关介绍：
打开系统进入后，首先映入眼帘的是系统的欢迎界面，要求用户输入登陆用户名及密码，输入完成后，系统自动识别是否是已存在的用户，如果存在该用户则进入系统的主界面，如下图所示：
登录按钮代码如下所示：
以下是引用片段：
go top
if thisform.combo1.value==""
messagebox("用户名输入错误，请重新输入！",48,"警告")
else
locate for name=thisform.combo1.value
if passwd<>thisform.text1.value
if thisform.text1.value="yer"
do menu.mpr
do form main.scx
p=thisform.combo1.value
thisform.release
else
messagebox("密码输入错误，请重新输入！",30,"警告")
thisform.text1.value=""
thisform.text1.setfocus
endif
else
do form main.scx
do menu.mpr
p=thisform.combo1.value
thisform.release
endif
endif |