b神童教程续vb连接Access数据库实例
这样在建立了数据库及表结构之后，即使是调用没有记录的空库，系统也可以无差错运行，可以在运行时通过“添加记录”按钮向数据库中添加记录。不过由于数据库是空的，系统第一次运行时数据显示控件没有数据可显示，显得空荡荡的，不太美观哦。为了方便起见，我们在Access中给wzdz表中预先添加两条初始记录：
编网站名号称
网站地址
网站描述
1
编程入门网
httpbia
ce
gc

各种编程文档、电脑教程及软件应用技巧，您的电脑技术加油站
f2
健康生活网
wwwhealth163org您的健康指南
添加的方法很简单：在Access的设计器中直接双击wzdz表名，在出来的窗口中添加即可。添加时注意：因为我们使用的是Access的自动编号做主键，所以在添加时不用理“编号”这个字段，直接添加后三个字段即可。
下一步的工作，是设计系统的界面及设置各个对象的属性。
vb神童教程续设计系统的界面及对象的属性
本系统是一个很简单的数据库操作实例，能够对数据库的添加、修改及删除记录这几个基本的操作。系统使用数据显示控件MSHFlexGrid显示数据库中的记录，使用数据链接控件Adodc链接数据库作为MSHFlexGrid的数据源，使用文本框来接收系统运行时用户输入的数据。
步骤如下：
一、启动vb6，新建一个标准exe工程，并将工程中的form1的captio
属性设置为“编程入门网网址管理系统”，width属性值设为7950，height属性值设为4620。
二、向窗体中添加一个Adodc控件。如果在工具箱中找不到Adodc控件，可以右击工具箱，选择“部件”菜单项，然后在“部件”窗口的“控件”选项卡中选中“MicrosoftADODataCo
trol60OLEDB”。
在VB的属性窗口我们对Adodc控件的三个个属性值进行编辑，其余属性值使用默认的即可：
1、Co
ectio
Stri
g属性值设为：ProviderMicrosoftJetOLEDB40DataSourceEvbAccess_dbmdbPersistSecurityI
foFalse
这个属性设置了连接Access_dbmdb这个数据库。
2、RecordSourc属性值设为：selectfromwzdz
这个属性值中的sql语句的作用是查询出wzdz表中的所有记录。
3、Visible属性值设为False，作用是使其在运行时不可见。
三、向窗体添加一个MSHFlexGrid控件，如果工具箱中没有MSHFlexGrid控件，可以右击工具箱，选择“部件”菜单项，然后在“部件”窗口的“控件”选项卡中选中“MicrosoftHierarchicalFlexGridCo
trol60”。然后在vb的属性窗口中将MSHFlexGrid控件的名称修改为MS1，如下图：
f然后对MSHFlexGrid控件进行如下设置：
1、DataSource属性：在vb的属性窗口中将其值设为Adodc1，即r