三层注册+VB.net实现

最近几天设计模式放了放，看了一套关于三层的视频，关于三层架构在VS中怎么实现登录，自己做了一下，下面是注意事项，以及步骤和代码。

第一步：

搭建环境

创建窗体

搭建三层：

新建解决方案

模板层 数据访问层 业务逻辑层

在解决方案中新建三个类库：编译成为dll文件

建立模板层：

模板层的作用：与数据库表字段一一对应的cs文件。

建立数据访问层：

注意事项：1、实际做工程中尽量用存储过程。

2、可以使用构造参数的方式。

3、拼接字符串---不可取

代码实现：

首先建立模板层：

模板层的主要作用是建立与数据库表字段一一对应的cs文件。

新建类m_userInfo

Public Class m_userInfo Private _userID As Integer Private _userName As String Private _userPwd As String Private _email As String Private _qq As String ''' <summary> ''' 用户ID ''' </summary> ''' <value></value> ''' <returns></returns> ''' <remarks></remarks> Public Property userID() As Integer Get Return _userID End Get Set(ByVal value As Integer) _userID = value End Set End Property ''' <summary> ''' 用户姓名 ''' </summary> ''' <value></value> ''' <returns></returns> ''' <remarks></remarks> Public Property userName() As String Get Return _userName End Get Set(ByVal value As String) _userName = value End Set End Property ''' <summary> ''' 用户密码 ''' </summary> ''' <value></value> ''' <returns></returns> ''' <remarks></remarks> Public Property userPwd() As String Get Return _userPwd End Get Set(ByVal value As String) _userPwd = value End Set End Property ''' <summary> ''' 用户Email ''' </summary> ''' <value></value> ''' <returns></returns> ''' <remarks></remarks> Public Property email() As String Get Return _email End Get Set(ByVal value As String) _email = value End Set End Property ''' <summary> ''' 腾讯QQ ''' </summary> ''' <value></value> ''' <returns></returns> ''' <remarks></remarks> Public Property qq() As String Get Return _qq End Get Set(ByVal value As String) _qq = value End Set End PropertyEnd Class 

数据访问层（DAL）