计算机毕业设计介绍：
6.2 登陆窗体的设计
这个窗体主要用来对管理员进行登录操作，管理员输入“编号”和“密码”后对管理员输入的进行验证。如果用户编号和密码正确单击“确定”进入系统主窗体。
添加一个窗体，这个窗体共由1个form控件、4个label控件、3个textbox控件和2个button控件组成。窗体运行效果如图所示。
主要代码设计：
// '判断用户输入密码的合法性
If Me.UserPwd.Trim() = Me.txbPwd.Text.Trim() _
And UserPwd <> "" Then
'合法用户
' bResult = True
'UserName = Me.txbName.Text.Trim()
'Me.Close()
Dim frmlogin As New frmMain
frmlogin.Show()
Me.Hide()
Else
'密码错误
bResult = False
MessageBox.Show("请确认你的用户名或密码是否正确")
End If
End Sub
…… …… …… ……
在该窗体加载时候进行数据库的连接输入编号，如果编号正确，自动加载姓名，然后输入用户密码。如果密码正确进入系统主窗体控件。如果密码不正确，提示密码错误。
6.3 主窗体的设计
本窗体主要是由读者管理、图书管理、流通管理和退出系统等几个菜单控件组成。选择主菜单中的各菜单项即可进入相应的功能模块。
6.4 创建数据访问模块
因为各个窗体均需要对数据库进行访问，可以把数据库的一些操作通过一个类实现，这样就可以使对数据库的访问更加简单。添加一个名为“DataBase.vb”的类文件。主要代码设计：
Public Class DataBase
'实现接口IDisposable
Implements IDisposable
'数据库连接对象
Private SqlConn As SqlConnection
Public Shared sConn As String = "Persist Security Info=False;Integrated Security=SSPI;database=libbook;server=本机数据库服务器名称;Connect Timeout=30"
…… …… …… ……
Public Sub Open()
If SqlConn Is Nothing = True Then
'建立数据库连接对象
SqlConn = New SqlConnection(Me.sConn)
'打开数据库连接
SqlConn.Open()
End If
End Sub
Public Sub Close()
'如果数据库连接对象不为空则关闭数据库连接
If SqlConn Is Nothing = False Then
SqlConn.Close()
End If
End Sub
〖资料来源:计算机毕业论文 www.xiaoniu168.com〗
第9页为计算机毕业论文部分......