Adodc1.RecordSource = "select yjbh,cfdd,kcsl,nfjy from kc_t where yjmc='" & Combo1.Text & "'"
'//------------
set DataGrid1.DataSource = Adodc1
'//------------DataGrid1.Columns(0).DataField = "yjbh"
DataGrid1.Columns(1).DataField = "cfdd"
DataGrid1.Columns(2).DataField = "kcsl"
DataGrid1.Columns(3).DataField = "nfjy"
'//------------
set DataGrid1.DataSource = Adodc1
'//------------DataGrid1.Columns(0).DataField = "yjbh"
DataGrid1.Columns(1).DataField = "cfdd"
DataGrid1.Columns(2).DataField = "kcsl"
DataGrid1.Columns(3).DataField = "nfjy"
我用了编译后系统说"对象变量或with快变量未设置"
怎么解决?
你试试看!
在引用里加在对ADO的引用试试看!!!