【文档说明】任务三访问Access数据库课件.ppt，共(48)页，2.033 MB，由小橙橙上传

转载请保留链接：https://www.ichengzhen.cn/view-92399.html

以下为本文档部分文字说明：

广东农工商职业技术学院VB.NET程序设计任务三访问Access数据库广东农工商职业技术学院2VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计学习目标1、了解数据库、表、字段、记录等基本概念2、了解使用Access系统创建Ac

cess数据库3、掌握访问Access数据库的方法广东农工商职业技术学院3VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计数据库术语数据库（Datab

ase）：存储于文件中的有组织的信息集合数据表（Table）：由行和列组成的信息集合字段（Field）：存储于数据库中的信息的类别记录(Record)：有关一个特定客户或企业的所有信息叫一条记录广东农工商职业技术学院4VB.NET程序设计VB.NET程序设计VB.NE

T程序设计VB.NET程序设计VB.NET程序设计ADO.NET1、VB.NET并非是用来创建新数据库的，而是用于显示、分析和操作数据库中的信息。2、ADO.NET是VB.NET提供的一种新的访问数据库的数据模型（或叫数据访问工具），通过这种数据模型可以访问更多格式的数据库（如

Access、FoxPro、Paradox、Oracle、SQLServer等）；也不管这些数据库放在什么位置都能访问（本地或是网上）。3、组成ADO.NET的是一些类，这些类位于System.Data命名空间中，他们提供了连接

数据库、读取数据库和更新数据库等操作。广东农工商职业技术学院5VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计预备知识——结构化查询语言SQLSQL是一种标准化的数据库查询语言,虽说是一种查询语言,但它可完成对数

据库的各种操作,包括数据的查询、增加、修改、删除以及其他操作。SQL主要语句：Select语句、Insert语句、Update语句、Delete语句。广东农工商职业技术学院6VB.NET程序设计VB.NET程序设

计VB.NET程序设计VB.NET程序设计VB.NET程序设计预备知识——结构化查询语言SQLSelect语句的语法格式：Select字段名From数据表名[Where条件]举例：Select*From学生信息Select*From学生信息Where

姓名=“李丽”Select姓名From学生信息Where姓名=“李丽”select*fromstudent1where学号<=3select*fromstudent1where学号Between5And10广东农工商职业技术学院7VB.

NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计预备知识——结构化查询语言SQLSelect语句举例：select*fromstudent1where姓名like“刘*”select*from书名where书籍类别I

n(“数据库”,”Internet”)select*from书名where书籍类别In(“数据库”)AndPubID=1select*fromstudent1where姓名like“刘*”orderby学号A

SC注：使用ORDERBY子句排序，升序的关键字为ASC，降序为DESC。广东农工商职业技术学院8VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计预备知识——结构化查询语言SQLupdate、inse

rt、delete语句举例：insertintoStuInfo(name,age)values(“张山”，19)updateStuInfosetname=“张三“,age=18whereid=005delete*fromStuInfowhereid=18广东农

工商职业技术学院9VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计使用Access创建数据库操作步骤：1、启动Access办公软件2、→文件/新建3、双击“使用设计器创建表”4、设置主键：右击某个字段名，选“主键”5、添加数据：双

击表名，直接添加数据，保存广东农工商职业技术学院10VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计访问Access数据库——显示广东农工商职业技术学院11VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计V

B.NET程序设计访问Access数据库——显示方法一：在VisualStudio.NET中建立连接1、从工具箱中的“数据”标签中双击OleDbDataAdapter对象如果工具箱中的“数据”标签中没有OleDbDataAdapter对象，则可以右

击“数据”工具箱中某控件例如DataSet控件，从弹出的快捷菜单中执行[选择项…]命令（如图），打开“选择工具箱项”对话框，选择“.NETFramework组件”选项卡，从中选择OleDbCommand、O

leDbConnection、OleDbDataAdapter这三个组件（在这三项组件的名称前的方框内打勾即可）。单击“确定”按钮，这三个组件就被添加到工具箱中了。123广东农工商职业技术学院12VB.NE

T程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法一：在VisualStudio.NET中建立连接接下来，出现“数据适配器配置向导”对话框，点击“新建连接”按钮。出现“添加连接”对话框。可以

执行“更改”选择数据源的类型。这里选择“其他”，然后点“确定”，接着，在OLEDB提供程序下选择：MicrosoftJet4.0OLEDBProvider2143广东农工商职业技术学院13VB.NET程序设计VB.NET程序设计VB.NET程序设

计VB.NET程序设计VB.NET程序设计方法一：在VisualStudio.NET中建立连接点“数据链接”按钮。出现“数据链接属性”对话框，在“连接”选项卡中选择或输入数据库名称右边的小按钮中选取数据库文件。选好后，点“测试连接”，提示“测试连接成功”21广东农工商职业技术学院14VB.N

ET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法一：在VisualStudio.NET中建立连接点“确定”，回到“添加连接”对话框点“确定”，回到“数据适配器配

置向导”对话框，可以查看连接字符串。点“下一步”，出现如图3对话框。这里请选择“是”（那么访问数据库时，将是相对路径，即.exe可执行文件和数据库文件将在同一个目录下），接着再点“下一步”21图334广东农工商职业技术学院15VB.NE

T程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法一：在VisualStudio.NET中建立连接出现如图后，点“查询生成器”按钮。选择要用的表，然后点“

添加”，把要用的字段依次打勾。然后点“确定”。213广东农工商职业技术学院16VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法一：在VisualStudio.NET

中建立连接回到如图对话框，点“下一步”，点“完成”。最终，窗体下方生成“OleDbDataAdapter1”和“OleDbConnection1”两个对象（如图）。312广东农工商职业技术学院17VB.NET程序设计VB.NET程序设计VB.N

ET程序设计VB.NET程序设计VB.NET程序设计方法一：在VisualStudio.NET中建立连接右键“OleDbDataAdapter1”，选择“生成数据集…”,点“确定”后，生成数据集对象“DataSet11”31

23广东农工商职业技术学院18VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法一：在VisualStudio.NET中建立连接2、将数据源绑定到一个或多个显示控件上问题:什么样的控件可以做为数据源的显示控件?一般来

说,凡是具有DataBindings属性的控件都可做显示控件,典型的例子:TextBox、Label、ComboBox等控件广东农工商职业技术学院19VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法一：在Vis

ualStudio.NET中建立连接将数据源绑定控件的操作如下：在属性窗口中设置文本框的DataBindings属性打开DataBindings分类，单击Text属性，单击下拉箭头选择某个数据集对象中某个表的某个字段广东农工商职业技术学院20VB.NET程序设计VB.NET程序设计V

B.NET程序设计VB.NET程序设计VB.NET程序设计方法一：在VisualStudio.NET中建立连接3、编写一部分代码关键代码：利用数据适配器给数据集手动加载数据OleDbDataAdapter1.Fill(Dataset11)上述代码可以放在某个命令按

钮的单击事件过程中，也可放在窗体的Load事件过程中广东农工商职业技术学院21VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法一：在VisualStudio.NET中建立连接课堂实训广东农工商职业技术学院22VB.NET程序设

计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计访问Access数据库——显示方法二：使用较多的代码ADO.NET对象结构广东农工商职业技术学院23VB.NET程序设计VB.NET程序设计VB.NET

程序设计VB.NET程序设计VB.NET程序设计方法二：使用较多的代码ADO.NET对象功能（访问数据库时要用到的对象及步骤）1、Connection对象负责连接数据库2、Command对象负责对数据库下达SQL命令3、在ADO.NET中，介于Dataset和Connection对象之

间还有一个对象DataAdapter，负责传递数据。4、Dataset对象用来保存所查询到的数据记录，是一种非连接的数据缓存。广东农工商职业技术学院24VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方

法二：使用较多的代码创建Connection对象时，可以使用2个类：1、SqlConnection类：管理SQLServer7.0或以上数据源的连接,该类位于System.Data.Sqlclient命名空间。2

、OledbConnection类：管理可通过OLEDB访问的数据源的连接，例如Access数据库。该类位于System.Data.OLEDB命名空间。同样，创建Command对象和DataAdapter对象时都有2个类可以选择，要看访问的

数据源的类型。广东农工商职业技术学院25VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法二：使用较多的代码方法二：使用较多的代码1、声明连接对象DimMycnAsNewOleDbConnectionMy

cn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=D:\luo\人力资源管理系统\hrmbook.mdb;PersistSecurit

yInfo=False"2、声明命令对象DimmyCommandAsNewOleDbCommandmyCommand.CommandText=“select*from职员基本信息表”myCommand.Connection=Mycn3、声明

数据适配器对象DimmyDataAdapterAsNewOleDbDataAdaptermyDataAdapter.SelectCommand=myCommand4、声明数据集对象DimmyDataSetAsNewDat

aSet5、打开连接Mycn.Open()6、通过数据适配器填充已连接的数据源的数据到数据集中(一个数据适配器只能填充一张表)myDataAdapter.Fill(myDataSet,"职员表")7、关闭连接Mycn.

Close()广东农工商职业技术学院26VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法二：使用较多的代码连接好数据库后，用代码绑定数据集到显示控件，如下所示：Me.TxtName.DataBind

ings.Add(“text”,myDataSet,“职员基本信息表.姓名")Me.TxtID.DataBindings.Add(“text”,myDataSet,“职员基本信息表.职员编号")其他要注意的地方：

在类定义的开头要指出数据访问对象所在的命名空间：ImportsSystem.Data.OleDb广东农工商职业技术学院27VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法二：使用较多的代码（例子）例1：用较多代码访问数据库（请注意访问

数据库的步骤，访问数据库时使用的是相对路径【数据库文件和可执行文件在同一个文件夹里】）数据库为Student.mdb,有一个Records表，该表字段为：编号，姓名，性别，出生日期，家庭住址，手机，Email，Oicq。广东农工商职业技术学院28VB.NET程序设

计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计方法二：使用较多的代码（例子）例2：请注意定义连接等对象的代码和例1有所不同。'说明：本例子并没有用到命令对象，请注意连接对象数据适配器对象的定义和赋值‘1、声明连接

字符串（访问该数据库时用的是绝对路径）DimsConnStringAsString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=F:\VS2005Project\WindowsApplication7

\bin\Debug\Student.mdb;PersistSecurityInfo=False"'2、声明连接对象DimMycnAsNewOleDbConnection(sConnString)'3、声明命令对象'DimmyCommandAsOl

eDbCommand'4、声明数据适配器对象DimmyDataAdapterAsNewOleDbDataAdapter'5、声明数据集对象DimmyDataSetAsNewDataSet'6、打开连接

Mycn.Open()'7、通过数据适配器填充已连接的数据源的数据到数据集中(一个数据适配器只能填充一张表)DimmySqlAsStringmySql="select*fromRecords"myDataAdapter=NewOleDbDat

aAdapter(mySql,Mycn)myDataAdapter.Fill(myDataSet,"Records")'8、关闭连接Mycn.Close()'9、用代码绑定数据集到显示控件Me.TextBox1.DataBindings.Add("Text",myDa

taSet,"Records.编号")Me.TextBox2.DataBindings.Add("Text",myDataSet,"Records.姓名")Me.TextBox3.DataBindings

.Add("Text",myDataSet,"Records.性别")Me.TextBox4.DataBindings.Add("Text",myDataSet,"Records.出生日期")Me.

TextBox5.DataBindings.Add("Text",myDataSet,"Records.家庭住址")Me.TextBox6.DataBindings.Add("Text",myDataSet,"Records.手

机")Me.TextBox7.DataBindings.Add("Text",myDataSet,"Records.Email")Me.TextBox8.DataBindings.Add("Text",myDataSet,"Recor

ds.Oicq")绝对路径广东农工商职业技术学院29VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计访问Access数据库——显示创建导航控件广东农工商职业技术学院30VB.NE

T程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计访问Access数据库——显示创建导航控件的代码:‟首条PrivateSubButton6_Click(ByValsenderAsSystem.Object,ByValeAsSystem.Event

Args)HandlesButton6.ClickMe.BindingContext(DataSet11,"职员基本信息表").Position=0EndSub„最后一条PrivateSubButton7_Click(ByValsenderAsSystem.Object,ByValeA

sSystem.EventArgs)HandlesButton7.ClickMe.BindingContext(DataSet11,"职员基本信息表").Position=Me.BindingContext(DataSet11,"职员

基本信息表").Count-1EndSub‟前一条PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesBut

ton1.ClickMe.BindingContext(DataSet11,"职员基本信息表").Position-=1EndSub„下一条PrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSyste

m.EventArgs)HandlesButton2.ClickMe.BindingContext(DataSet11,"职员基本信息表").Position+=1EndSub广东农工商职业技术学院31VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.

NET程序设计VB.NET程序设计关于Command对象Command对象的主要属性：1、Connection属性：设置用于执行命令的Connection对象。2、CommandText属性：设置被执行的SQL语句。下面两段代码的效果相同（声明命令对

象有二种方法）：DimsConnStringAsString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=D:\luo\人力资源管理系统\hrmbook.mdb;PersistSecurityInfo=

False"DimMycnAsNewOleDbConnection(sConnString)DimmyComAsOleDbCommand‘此方法声明可以不用关键字New,当然用也可以DimmySqlAsStringm

ySql="selectsum(奖励金额)as奖金,职员编号from职员奖励表“Mycom=NewOleDbCommand(mySql,Mycn)DimsConnStringAsString="Provider=Microsoft.Jet.OLEDB.4.

0;DataSource=D:\luo\人力资源管理系统\hrmbook.mdb;PersistSecurityInfo=False"DimMycnAsNewOleDbConnection(sConn

String)DimmyComAsNewOleDbCommand‘此方法声明一定要用关键字NewDimmySqlAsStringmySql="selectsum(奖励金额)as奖金,职员编号from职员奖励表“Mycom.Connection=MycnMycom.CommandText=m

ySql广东农工商职业技术学院32VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计关于Command对象Command对象的方法：1、ExecuteNo

nQuery方法：执行一个SQL命令，但不返回结果，只返回一个值说明有多少行数据被处理。2、ExecuteReader方法：执行一个SQL命令，并生成DataReader对象作为结果返回。使用该方法时要先创建DataReader对象用来

获取数据。案例见：DataBase.vb和frmSalary.vb广东农工商职业技术学院33VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计关于DataReader对象DataRead

er对象是基于连接的数据流，它一次只将一个记录导入内存，而不会将结果集的所有记录同时返回，因此可以避免耗费大量内存资源。1、Read方法：读取DataReader对象的下一行记录。详解：当DataReader对象首次打开时它被置于文件开始位置即第一行之前

，当调用一次Read方法，DataReader才会移动到结果集的第一行处。以后每调用依次Read方法，DataReader都会移动到结果集的下一行处，直到Read方法返回False为止，表明此时查询无结果。2、GetType方法：将指定列的值作为指定类型获取。例如：G

etString方法表示将取得的字段数据设为字符串案例见：frmSalary.vb广东农工商职业技术学院34VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计DataRead

er对象举例1广东农工商职业技术学院35VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计DataReader对象举例2DimsConnStringAsString="Provider=M

icrosoft.Jet.OLEDB.4.0;DataSource=D:\luo\人力资源管理系统\hrmbook.mdb;PersistSecurityInfo=False"DimMycnAsNewOleDbConnectio

n(sConnString)DimmyComAsOleDbCommandMycn.Open()DimmySql,strSQLAsStringmySql="selectsum(奖励金额)as奖金,职员编号from职员

奖励表“Mycom=NewOleDbCommand(mySql,Mycn)DimdrAsOleDbDataReaderdr=Mycom.ExecuteReaderWhile(dr.Read())DimjineAsDouble=dr.GetDouble(0)DimidAsStri

ng=dr.GetString(1)strSQL=“update月工资统计表set奖金=”+jine.ToString()+“where职员编号='"&id&“‟”EndWhiledr.Close()Mycom=NewOleDbComma

nd(strSQL,Mycn)Mycom.ExecuteNonQuery()注意：该案例只执行了月工资统计表最后一条记录的更新，如何完善程序？见DataBase.vb和frmSalary.vb（通过数组知识和事务知识）广东农工商职业技术学院36VB.NET程序设计VB.NE

T程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计访问Access数据库——增加2、内容录入完毕后，保存到数据库PrivateSubbtnSave_Click(ByValsenderAsSystem.Object

,ByValeAsSystem.EventArgs)HandlesbtnSave.ClickTry'异常处理，防止添加记录时出错'请注意SQL语句的书写，特别要注意：哪两个双引号相互匹配，哪两个单引号相互匹配Dimstr

AsString="insertintoRecords(编号,姓名,性别,出生日期,家庭住址,手机,Email,Oicq)values('"&Me.TextBox1.Text&"','"&Me.TextBox2.Text&"','"&Me.TextB

ox3.Text&"','"&Me.TextBox4.Text&"','"&Me.TextBox5.Text&"','"&Me.TextBox6.Text&"','"&Me.TextBox7.Text&"','"&Me.T

extBox8.Text&"')"'声明命令对象DimmycomAsOleDb.OleDbCommandmycom=NewOleDb.OleDbCommand(str,Me.OleDbConnection1)'打开连接M

e.OleDbConnection1.Open()'执行无返回结果的查询命令ExecuteNonQuerymycom.ExecuteNonQuery()'清空数据集，因为数据库的内容已经发生变化Me.DataS

et11.Clear()Me.BindingContext(Me.DataSet11,"Records").ResumeBinding()‘恢复数据绑定'把最新的数据重新填充到数据集Me.OleDbDataAdapter1.Fill(Me.DataSet11,"Records")

'关闭连接Me.OleDbConnection1.Close()Me.btnClear.Enabled=True'清空功能可用Me.btnSave.Enabled=False'保存功能不可用MsgBox("记录添加成功！")'出现错误时执行。ex

的Message包含了错误的信息CatchexAsExceptionMe.BindingContext(Me.DataSet11,"Records").ResumeBinding()‘恢复数据绑定Me.Ol

eDbConnection1.Close()MsgBox(ex.Message)EndTryEndSubPrivateSubbtnClear_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesbtnClear.Cl

ick'把各文本框清空，准备录入新的记录Me.BindingContext(Me.DataSet11,"Records").SuspendBinding()'挂起数据绑定Me.TextBox1.Text=""Me.TextBox2.Text=""Me.TextBox3.

Text=""Me.TextBox4.Text=""Me.TextBox5.Text=""Me.TextBox6.Text=""Me.TextBox7.Text=""Me.TextBox8.Text=""Me.btnSave.Enable

d=True'保存功能可用Me.btnClear.Enabled=False'清空功能不可用Me.TextBox1.Focus()EndSub1、清空各文本框内容，准备录入记录广东农工商职业技术学院37VB.NET程序设计VB.NET

程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计访问Access数据库——增加例子1：程序运行界面图广东农工商职业技术学院38VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NE

T程序设计访问Access数据库——修改PrivateSubbtnUpdate_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesbtnUpdate.

ClickTryDimstrAsString="updateRecordsset姓名='"&Me.TextBox2.Text&"',性别='"&Me.TextBox3.Text&"',出生日期='"&Me.Text

Box4.Text&"',家庭住址='"&Me.TextBox5.Text&"',手机='"&Me.TextBox6.Text&"',Email='"&Me.TextBox7.Text&"',Oicq='"&Me.TextBox8.Text&"'where编号='"&

Me.TextBox1.Text&"'"DimmycomAsOleDb.OleDbCommandmycom=NewOleDb.OleDbCommand(str,Me.OleDbConnection1)Me.OleDbC

onnection1.Open()mycom.ExecuteNonQuery()Me.DataSet11.Clear()Me.OleDbDataAdapter1.Fill(Me.DataSet11,"Records")Me.Ole

DbConnection1.Close()MsgBox("记录修改成功！")CatchexAsExceptionMe.OleDbConnection1.Close()MsgBox(ex.Message)EndTryEndSub修改记

录时，主键字段不可更改，因此，该SQL语句有一个where条件语句广东农工商职业技术学院39VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计访问Access数据库——删除PrivateSubbtnDelete_Click(ByVals

enderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesbtnDelete.ClickTryDimstrAsString="deletefromRecord

swhere编号='"&Me.TextBox1.Text&"'"DimmycomAsOleDb.OleDbCommandmycom=NewOleDb.OleDbCommand(str,Me.OleDbConnection1)Me.OleDbConnecti

on1.Open()mycom.ExecuteNonQuery()Me.DataSet11.Clear()Me.OleDbDataAdapter1.Fill(Me.DataSet11,"Records")Me.OleDbConnection1.Close()MsgBox("记录删除成功！"

)CatchexAsExceptionMe.OleDbConnection1.Close()MsgBox(ex.Message)EndTryEndSub广东农工商职业技术学院40VB.NET程序设计VB.NET程序设计V

B.NET程序设计VB.NET程序设计VB.NET程序设计关于DataGridView控件DataGridView控件具有极高的可配置性和可扩展性，它提供大量的属性、方法和事件，可以用来对该控件的外观和行为进行自定义。当需要在Windows窗体应用程序中显示表格数据时，应

首先考虑使用DataGridView控件，然后再考虑使用其他控件（例如DataGrid）。一般设置两个属性：DataSource：某个数据集对象DataMember：该数据集对象的某个表1添加控件2设置属性3运行界面广东农工商职业技术学院41VB.

NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计关于DataGrid控件DataGrid控件用于显示数据表中的数据，该控件可用来显示单个表，也可以显示多个不相关的表，也可以显示多个相关的表。具

体的用法详见“任务七”若工具箱中找不到DataGrid控件，可以在“所用Windows窗体”分组工具箱中，右键，然后选择“选择项…”，在出现的窗口中，选择“.NETFramework组件”选项卡，找到“DataGrid”然后在其前面打勾。

然后点“确定”。那么DataGrid就添加到工具箱中。123广东农工商职业技术学院42VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计关于DataViewDataView类：表示用于排序、筛选、搜索和编辑的表(DataTable)的可绑定数据

的自定义视图。创建DataView对象的方法：方法一：使用DataView构造函数DimcustDVAsDataView=NewDataView(custDS.Tables("Customers"))方法二：创建对DataTable的DefaultView属性的引用DimcustD

VAsDataView=custDS.Tables("Customers").DefaultView广东农工商职业技术学院43VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB

.NET程序设计关于DataViewDataView对象的属性:Sort属性:获取或设置DataView的一个或多个排序。例:Dataview1.Sort=“NameAsc”Dataview1.Sort=“NameDesc”RowFilter属性:获取或设置用于筛选

在DataView中查看哪些行的表达式。例:Dataview1.RowFilter=“Namelike„%陈%‟”RowStateFilter属性:获取或设置用于DataView中的行状态筛选器。例

:Dataview1.RowStateFilter=DataViewRowState.CurrentRowsDataview1.RowStateFilter=DataViewRowState.ModifiedOri

ginal___所有Modified行的Original行版本。广东农工商职业技术学院44VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计关于DataVie

w的一个例子若工具箱中找不到DataView控件，可以在“所用Windows窗体”分组工具箱中，右键，然后选择“选择项…”，在出现的窗口中，选择“.NETFramework组件”选项卡，找到“DataView”然后在其前面打勾。然后点“确定”。那么DataVi

ew就添加到工具箱中。123广东农工商职业技术学院45VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计关于DataView的一个例子双击“DataView”控件后，在当前窗体下方会出现“DataView1”对象，在DataView1控件的属

性窗口中，设置它的Tabel属性：某个数据集对象某个表接着把DataViewGrid控件的DataSource属性设置为DataView1。这样就可以使用DataView的属性：1234广东农工商职业技术学院46V

B.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计课堂实训实训1：创建一个Access数据库student,建一表Records，该表字段（字段类型均为文本，编号为主键）：编号，姓名，性别，

出生日期，家庭住址，手机，Email，Oicq。在VB.NET环境中创建一个访问该数据库的系统（包括显示、修改、删除、增加和保存等功能）。如图所示界面。实训2：利用数据库访问知识完善真实登录窗体frmlogin的代码广东农工商职业技

术学院47VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计书面作业工资管理系统具体要求请看Word文档广东农工商职业技术学院48VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计VB.NET程序设计补充内容访问

数据库的另外一种方法具体例子及内容参考文件夹“任务三相关例子及代码”文件夹里的