VB中DataGrid 控件使用一得.doc

VB中DataGrid 控件的使用一得 建湖县艺术高级中学 夏成仁 如今，使用VB对小型数据库ACCESS编程已很普遍，在VB窗体中要表格式显示库中的记录，首选的就是使用DataGrid 控件，DataGrid 控件可以很好地与ACCESS数据库结合，比较完美地输出记录，也可以与其它数据库结合（如EXCEL、FOXPRO）调用EXCEL可实现表格的打印。DataGrid 控件的使用对初上手的编程人员来说有一定的难度。下文是本人在使用这个控件过程中的一点心得。 一、DataGrid 控件使用前的准备 DataGrid 控件不是VB常用控件，正常新建的VB工程的工具箱中并不具有该控件，要使用该控件可进行如下操作，选择 “工程” 菜单中的“部件”菜单项，在出现的对话框中选中Microsoft Dategrid Control6.0。按“确定”按钮。在工具箱中便可添加了DataGrid 控件。另外还需要在工程中引用Microsoft ActiveX Date Objects2.0 Library,(菜单“工程” \ 引用)。经过以上两步骤后，编程人员可以将该控件放置在窗体中适当的位置。程序启动后，控件图示并不在窗口中出现。 表的记录集（RS）形成 在窗口中使用DataGrid 控件，就是要用这个控件显示一个数据库中某个表的记录。一个数据库的某个表（EXCEL工作薄的某个工作表）是保存在磁盘上数据，首先是将需要的记录装入内存，装入内存的一个表的所有记录记录（或表的部分记录）就形成一个记录集。这个记录集与表中的记录是对应的、互动的。记录指针是一致的。如删除了这个记录集中的一个记录，也就删除了磁盘中的一部数据。装入内存的目的主要是提高了操作的速度，内存中也许有多个记录集，一个记录集必用一个记录集变量表示（如：RS），这样便于使用这个记录集。 DataGrid 控件表面上显示数据库中某个表中的记录，在编程中，DataGrid 控件实际是显示一个记录集的内容，因此使用DataGrid 控件的重点是记录集的形成，一旦形成了记录集（RS）后，使用语句Set DataGrid1.DataSource = RS，便可使DataGrid 控件显示出RS记录集中的记录了。这个语句实现了对DataGrid 控件的绑定。 其实，要形成这样的记录集，有多种方法。ADO、DAO等，对于初学者，不一定要将这此方法一一学全、领会。他们之间是有一个的差别，特别在几十万记录的大型数据库的使用中会有较大的速度上的差异（本人试过4680003条记录的ACCES数据库）。要理解这此差别存在原因，确要分析不同连接的内部本质。创建数据库连接过程也就是形成记录集的过程。 ADO连接代码 Dim conn As ADODB.Connection Dim rs As New ADODB.Recordset 定义连接变量与记录集变量，在DataGrid 控件使用前的准备工作完成的前提之下，这两个定义语句才能正常使用。因为，在工程中引用Microsoft ActiveX Date Objects2.0 Library方可有ADODB.Connection与ADODB.Recordset类型。 Set conn = New ADODB.Connection Set rs = New ADODB.Recordset 该两语句与上面两定义语句相应。建立新的对象，准备打开数据库与形成记录集。以下是建立记录集的核心语句。 conn.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= + App.Path \userlb.mdb conn.Open rs.CursorLocation = adUseClient rs.Open select 姓名,学校 from usertt, conn, adOpenStatic, adLockOptimistic 其中：userlb.mdb是需要打开的数据库文件名，usertt是该数据库中的某一个表名。“姓名,学校”是这个表中的两个字段名。select 姓名,学校 from usertt是SQL，该语句是用来选择该表中部分字段及部分记录。rs.CursorLocation = adUseClient也很重要，是显示方式的确定，许多新手正是由于缺少了该条语句，结果是不报错, DataGrid 控件也不正常显示记录内容。 经过上述的准备后，记录集RS已经建立。使用Set DataGrid1.DataSource = rs语句，便可将这个记录集的记录显示在DataGrid 控件中。 使用ADODC控件的连接方法 ADODC控件并不是常用的控件，正常情况下在工具箱中不出现，选择“工