当把数据网格控件的DataSource属性设置为一个Data控件时,网格控件会被自动地填充,并且其列标题会用Data控件的记录集里的数据自动地设置。
data控件与MsFlexGrid控件结合显示数据库中信息
用数据网格控件MsFlexGrid显示Student.mdb数据库中基本情况表的内容。
MsFlexGrid控件不是Visual Basic工具箱内的默认控件,需要在开发环境中选择“工程|部件”菜单命令,并在随即出现的对话框中选择“MicroSoft FlexGrid Control 6.0”选项,将其添加到工具箱中。本例所用控件的属性设置如表9.4所示。请读者自行比较不可卷动列属性FixedCols=0与FixedCols=1的区别。Form启动后自动显示如图9.9所示窗口。
表9.4 控件属性
默认控件名
其它属性设置
Data1
DatabaseName=”c:\student.mdb”
RecordsetType=0
RecordSource=”基本情况”
MSFlexGrid1
DataSource=Data1
FixCols=0
2.3数据控件的常用方法
学习数据库控件的内置功能很多,可以在代码中用数据控件的方法访问这些属性。
1.Refresh方法
如果在设计状态没有为打开数据库控件的有关属性全部赋值,或当RecordSource在运行时被改变后,必须使用数据控件的Refresh方法激活这些变化。在多用户环境下,当其他用户同时访问同一数据库和表时,Refresh方法将使各用户对数据库的操作有效。
例如:将例9.2的设计参数改用代码实现,使所连接数据库所在的文件夹可随程序而变化:
Private Sub Form_Load( )
Dim mpath As String
Mpath=App.Path’获取当前路径
If Right(mpath,1)