vb6.0+win2000+ado

Question

vb6.0+win2000+ado(求帮助)
问题1、如何把窗体form1中的dim sgm as string,sgm=text2.text的内容赋给DataReport中的LABEL1.caption（或text2.text），以便打印出来。
问题2、把窗体form1中的变量 dim sq as string ,sq=text1.text,如何在dataenvironment1中的 sql=select * from dj,de where dj.wjdm=de.wjdm and wjdm="'+sq+'"双重查询中运用？我的做法错在哪里？
我的做法：
Private Sub Command1_Click()
Dim sq As String
dim agm as string
tmp = Text1.Text
text2.text=sgm
label1.Caption = sgm
DataReport1.Show
End Sub

Answer 1

问题一DataReport.Controls("LabTitle").Caption =text2.text
问题二sql=select * from dj,de where dj.wjdm=de.wjdm and de.wjdm=’"+sq+"‘

Answer 2

问题一DataReport.Controls("LabTitle").Caption =text2.text
提示：找不到方法Controls？

Answer 3

问题二sql=select * from dj,de where dj.wjdm=de.wjdm and de.wjdm=’"+sq+"‘
报表打印窗口没有东西！去掉and de.wjdm=’"+sq+"‘后就都有了