1：Access，建立数据库，数据库命名为Database1.mdb。
（注意：这里的后缀是MDB,如果Access是2007版本的，保存的时候要另存为2003版本的才行，因为，VB不直接支持07版的accdb后缀格式。）
2：数据库建立后就进入了数据表界面，可以输入数据了，输完以后CRRL+S保存，输入表名，这里表名为test，ok，准备工作搞定。
3.打开VB,然后新建标准exe。
4.菜单中找到工程→部件→勾选 ，
Microsoft ADO Data Control 6.0
Microsoft Hierarchical Flexgrid Control 6.0
勾选后左侧工具栏里就多了两个控件即 ADODC控件和MSHFlexGrid控件。
5.选择 ADODC控件和MSHFlexGrid控件，放在窗体的合适位置，如图：
6.设置ADODC控件的属性：
右键窗体内ADODC1控件
1）ADODC属性页→通用→选择使用连接字符串→点击生成→选择Microsoft Jet 4.0 OLE DB Provider 点击下一步→选择之前准备好的数据库→点击测试连接，显示测试成功则ok，确定。
2）ADODC属性页→记录源→命令类型选择2-adcmdtable，表或存储过程名称选择之前建立的数据表test，点击确定，ADODC属性设置完成。
7.设置MSHFlexGrid控件的属性：
VB右侧属性表里，找到datasource，选择adodc1.
8.测试效果：
1）菜单→运行→启动（F5),发现显示的数据排列不是我们想要的行数和列数
修改方法：
2）MSHFlexGrid属性→通用→设置行和列，固定行和固定列，设置见图。
3）MSHFlexGrid属性→带区→把列标题的√取消掉，设置见图。
9.修改后的测试效果：
方法有两：
方法一：
因为文本框是数据绑定控件（VB6中有不少控件属于数据绑定控件），可以直接帮定到数据表的某个字段。
帮定的方法是：设置它的 DataSource 属性到一个数据源（ADO控件或对象等），接下来设置它的
DataField 属性，从而绑定到需要的字段。
方法二：
在程序代码中显示指定的数据字段内容，例如：使用ADO控件，显示“姓名”字段"；
Text1.text = Adodc1.Recordset.Fields("姓名")追问
那如何在label控件中显示一个完整的access数据库的表？
追答在label控件中显示一个完整的access数据库的表？？？？？？
如果表有成千上万条记录，也这样显示啊？
不太可取！！！！
显示表，建议使用网格控件！