VB程序设计教程集

《VB程序设计教程集》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、12.1数据库管理器12.2数据控件的使用12.3SQL语言12.4ADO数据控件第12章VisualBasic6.0与数据库退出12.1数据库管理器图12-1可视数据库管理器利用可视化数据管理器可创建多种类型的数据库。创建步骤如下：单击“文件”菜单下的“新建”菜单项，出现数据库类型选择菜单。单击数据库类型菜单中的MicrosoftAccess将出现版本子菜单，在版本菜单中选择要创建的数据库版本。图12-2创建数据库的菜单选项2)选择要创建的数据库类型及版本后，出现新建数据库对话框，在此对话框中，输入要创建的数据库名“student.mdb”。3)此时，在可视化数

2、据库管理器窗口中出现“数据库窗口”和“SQL语句”窗口，如图12-3所示。“数据库窗口”以树型结构显示数据库中的所有对象，单击鼠标右键激活快捷菜单，执行“新建表”、“刷新列表“等菜单项。图12-3数据库窗口和SQL窗口4)在“数据库窗口”中单击鼠标右键，出现快捷菜单，执行“新建表”菜单项便可为数据库添加一个新表。5)屏幕出现如图12-4所示的“表结构”对话框。在这个对话框中，可输入新表的名称，并添加字段，也可从表中删除字段，还可以添加或删除作为索引的字段。字段名类型及长度索引名学号文本10位ID姓名文本10位NAME性别BOLLEAN出生年月DATA图12-4“表

3、结构”对话框表12-1字段属性列表图12-5添加字段”对话框6)添加字段完成后，单击“添加字段”对话框中的“关闭”按钮。回到如图12-6所示的“表结构”对话框，单击“添加索引”按钮，出现“添加索引”对话框，如图12-7所示，选择索引字段为“学号”，输入索引字段名为“ID”，单击“确定”按钮。图12-6添加字段后的“表结构”对话框图12-7添加索引对话框7)完成上述步骤后，单击“生成表”按钮，就会在“数据库窗口”中出现“学生情况”表，如图12-8所示。图12-8生成新表后的“数据库窗口”8）当一张表建立后，可以再建立另一张表。如果要在已经存在的数据库文件内增加一张新

4、表，只需要在数据管理器文件菜单中选择打开数据库命令，其余操作过程与建立数据表的操作相同。当表建好后，用鼠标左键双击出现在数据库窗口中的”学生情况”表名，打开图12-9所示的表格输入窗，选择对应命令进行添加、编辑、增删记录等操作。图12-9表格输入窗12.2数据控件的使用12.2.1数据控件常用属性12.2.2数据绑定控件常用属性返回退出12.2.4数据控件上的对象12.2.6数据控件的事件12.2.7数据库记录的增删改操作12.2.3使用数据控件操作数据库中的数据12.2.5数据控件的常用方法12.2.1数据控件常用属性Connect属性Connect属性指定数据

5、控件所要连接的数据库类型。VisualBasic6．0提供了7种可访问的数据库类型，VisualBasic可识别的数据库有：1）MicrosoftAccess的MDB文件（缺省值）；2）BorlanddBASE、MicrosoftFoxpro的DBF文件；3）BorlandParadox的DB文件；4）NovellBtrieve的DDF文件；5）MicrosoftExcel的XLS文件；6）Lotus的WKS文件;7）OpenDataBaseConnectivity(ODBC)数据库2.DatabaseName属性DatabaseName属性指定具体使用数据库的名

6、称，包括所有的路径名。如果连接的是单表数据库，则DatabaseName属性应设置为数据库文件所在的子目录名，而具体文件名放在RecordSource属性中。如果在“属性”窗口中单击DatabasName属性右边的按钮，会出现一个公用对话框用于选择相应的数据库。例如，下面语句设置了可访问的数据库名称：如果连接一个MicrosoftAccess的数据库C：职员档案．mdb，则Data1．DatabaseName＝”C：职员档案．mdb”；如果连接一个Foxpro数据库C：yang职员档案1．dbf，因为Foxpro数据库只含有一个表，则Data1．Datab

7、aseName＝”C：yang”,RecordSource=”职员档案1．dbf”。如果未写数据库文件的扩展名，则缺省情况下为使用以.mdb为扩展名的数据库文件。3）RecordSource属性RecordSource属性确定具体可访问的数据，这些数据构成记录集对象Recordset。4）RecordsetType属性RecordsetType属性确定记录集类型。5）ReadOnly属性在对数据库只查看不修改时，通常将ReadOnly属性设置为True，而在运行时根据一定的条件，响应一定的指令后，才将它设置为False。6）Exclusive属性Exclusiv

8、e属性值设