求VB+SQL中产生一个报表的问题。
谁帮我看看生成报表 txtSQL = "select * from party where party_Id = '" & txtId.Text & "'"
Set mrc = ExecuteSQL(txtSQL, MsgText)
Set PartyReport.DataSource = mrc
PartyReport.txtId1.DataField = mrc.Fields(1)
PartyReport.txtname1.DataField = mrc.Fields(2)
PartyReport.txtsex1.DataField = mrc.Fields(3)
PartyReport.txtBorn1.DataField = mrc.Fields(4)
PartyReport.txtNation1.DataField = mrc.Fields(5)
PartyReport.txtinsert1.DataField = mrc.Fields(6)
PartyReport.txtchapter1.DataField = mrc.Fields(7)
PartyReport.txtIdcard1.DataField = mrc.Fields(8)
PartyReport.txtWork1.DataField = mrc.Fields(9)
PartyReport.txtfamily1.DataField = mrc.Fields(10)
PartyReport.txtTele1.DataField = mrc.Fields(11)
经过编译,提示未找到方法或数据成员。 提示信息停在txtId1处
哪位帮我看看问题出在什么地方了