请指教！怎么给水晶报表里的对象副赋值！在线等

Question

我用的vb6.0+水晶报表9.0
CRViewer91.Top = 0
CRViewer91.Left = 0
CRViewer91.Height = ScaleHeight
CRViewer91.Width = ScaleWidthconn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\mkzyy\mkzyy.mdb;Persist Security Info=False"
Set rs = New ADODB.Recordset
sqlstr = "select * from mkzyy_fsk where id = " & CInt(findid)
rs.Open sqlstr, conn, 1, 1
 If Not rs.EOF Then
   CrystalReport1.Text2.Text = rs("zd_name")
    
   End If
  rs.Close
  
在给CrystalReport1.Text2.Text 赋值时
错误提示：不能给只读属性赋值
请问为什么？在线等

Answer 1

http://community.csdn.net/Expert/FAQ/FAQ_Index.asp?id=195585你看下这个FAQ水晶报表是一个模扳文件,是不需要你手工去赋值它会自动接受到VB中间传递的Recordset并且显示在对应的字段上也就是只要字段名字和长度一致就可以显示.

Answer 2

参考：http://blog.csdn.net/myhgyp/archive/2005/01/13/252260.aspx

Answer 3

用 CrystalReport1.Database.SetDataSource rs就好