[摘要]Microsoft Access是Visual Basic最常用的数据库，但Visual Basic没有提供类似Foxpro for Windows的BROWS命令的函数来浏览Access数据库。本...
Microsoft Access是Visual Basic最常用的数据库，但Visual Basic没有提供类似Foxpro for Windows的BROWS命令的函数来浏览Access数据库。本程序提供了一种类似BROWS命令界面浏览Access数据库的方法，感兴趣的读者可以把这个程序改写为带参数（数据库名、表名、字段名、字段宽度等）的子程序，实现类似Foxpro for windows的BROWS 命令的功能，在自己的应用程序中调用。
首先，在窗口中定义一个网格（gridl）、一个列表框（list1）、一个普通对话框（dlg）、一个数据察觉项（datal）、两个命令按钮（command1和command2），排好位置。
程序执行时，按“打开”按钮打开一个对话框，选定数据库文件后程序在列表框中显示数据库包含的表名，单击列表框中的表名即可浏览该表。本程序可自动根据字段长度和字体大小设置浏览区的大小，以保证浏览区不会超出窗口。如果窗口满足不了浏览区，程序自动给浏览区加水平或竖直滚动条。附程序清单：
1 Sub Command1_Click() ’鼠标器点“打开”键
2 Dim, I As Integer,cunt As Integer
3 grid1.Visible=False
4 dlg.Filename=""
5 dlg.Filter="Access(*.MDB)
关键词：用Visual Basic开发数据库浏览器