VB关于DBGrid1赋值的问题

来源:百度知道 编辑:UC知道 时间:2024/06/21 22:43:20
Data1.RecordSource = "Select * from 表1 Where 品名 =" & "'" & Text1.Text & "'"
Set DBGrid1.DataSource = Data1
DBGrid1.Refresh
Data1.Refresh
大家帮我看看这段代码。
实时错误 430
类不支持自动化或不支持期望的接口
但是在设计时绑定到DATA1会出现在刚开始运行是就会DBGRID就会加载DATA1中的所有数据,我不需要这样的效果,我想在进行筛选后再绑定。不知道有没有办法?

问题就在就里:

Set DBGrid1.DataSource = Data1

您不能在运行时将 DataSource 设置为一个内部 Data 控件,只能在设计时设置绑定控件的 DataSource 属性为 Data1,然后把这行去掉就可以了 。

是的,DataSource需要设计时绑定控件