- 1、本文档共15页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
VB.NET数据库项目通用模块的创建及其应用.doc
VB.NET数据库项目通用模块的创建及其应用
摘要:运用VB.NET技术建立数据库项目通用模块,并且通过运用listView控件,说明数据通用模块的应用方法,阐述了类的继承和扩展的具体运用,为设计高效、稳定的数据库管理系统提供宝贵资源。
关键词:通用模块;添加;删除;编辑
中图分类号:TP311 文献标识码:A 文章编号:1009-3044(2016)25-0011-05
Abstract: Using the built module database project of VB.NET technology and listView control,that demonstrate the application of method of general module data,Also described the specific use of inheritance and expansion of class. These Provide valuable resources for the database management system design of high efficiency and stable.
Key words: universal module; add; delete; edit
1 引言
VB.NET继承类允许扩展类,可以创造一个带有一定功能的新类。如果有部分功能已经能由一个已经存在的类提供了,则可以扩展原来的那个类来构建一个新类。那么新建的这个类成为子类或者继承类,而原来的那个类称为父类或者基类。扩充类的过程称为扩展,关键字为inherit 用于描述扩展类的行为。在VB.NET中一个类只能有一个父类。
2 数据库通用模块代码及其说明
打开Visual Studio 2010,新建一个工程,名称假设为SalesManager,在项目下新建一个文件夹,命名为TYConfig.在该文件夹下,添加6个类。其中TYConnection为父类,TYCommand、TYDataReader、TYDataTable子类3个为子类或称继承类。如图1解决方案资源资源管理器所示。下面分别介绍主要代码(注:单引号“‘”后面的文字为简要说明,与代码同行的是说明同行的代码;单独行的是说明下一行的代码)。
2.1 数据库连接通用模块
父类TYConnection
Imports System.Data.SqlClient ‘连接SQL Server
Namespace TYConfig ‘命名空间名称为TYConfig
Public Class TYConnection ‘声明类TYConnection
‘声明一个受保护变量存储连接数据库的信息
Protected ConnStr As String
‘声明用于数据库连接的保护成员
Protected conn As SqlConnection
Protected Sub Open()
‘判断连接字符串是否为空
If ConnStr Is Nothing Or ConnStr = Then
MessageBox.Show(请指定连接字符串!)
Return
End If
‘实例化Connection类
conn = New SqlConnection(ConnStr)
conn.Open() ‘打开数据库
End Sub
Protected Sub Close()
conn.Close() ‘关闭连接
End Sub
End Class
End Namespace
在这“TYConnection”类中,最上面二句和最下面一句,表示命名空间的定义,在下面3个继承类中不再重复。
2.2 创建TYCommand 类
该类包括 Function过程,分别实现添加、删除、更新数据。
Imports System.Data.SqlClient ‘连接SQL Server
Namespace TYConfig ‘命名空间名称为TYConfig
Public Class TYCommand ‘TYCommand类的声明
Inherits TYConnection ‘为继承TYConnection类的功能,重用这个类里的功能,避免代码重复
Public Sub New(ByVal str As String) ‘创建有一个参数为str的构造函数,指定连接信息字符串
ConnStr = str
End Sub
P
文档评论(0)