Dim objCtrl As MSDataReportLib.Controls
Set objCtrl = rpt.Sections.item("Head").Controls
objCtrl.item("lblName").Caption = "hello"
Set rpt.DataSource = rst
rpt.Show
这是昨天一位师傅回答我,我抄给你看看,里面的rst可能就是你想用的!
Set objCtrl = rpt.Sections.item("Head").Controls
objCtrl.item("lblName").Caption = "hello"
Set rpt.DataSource = rst
rpt.Show
这是昨天一位师傅回答我,我抄给你看看,里面的rst可能就是你想用的!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货