VB制作报表的问题

Question

N久前学过点VB,仅会做些对数据库的操作.现在想用VB做个小软件,要使用到报表,我一直找不到水晶报表的下载,不知道哪位仁兄能提供一下呀,听说要收费的,有免费的吗?
如果没有,希望能提供VB自带的Data Report的使用方法或例子,我只要简单的功能,不知道这东东好不好使.谢谢!!!

Answer 1

Data Report的例子:
 Private Sub DataReport_Initialize() 
    Dim AdoCon As New ADODB.Connection 
    Dim AdoRec As New ADODB.Recordset 
    Dim ctl As Object 
     
    AdoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\a.mdb;Persist Security Info=False" 
    AdoRec.Open "select * from a", AdoCon 
    Set DataReport1.DataSource = AdoRec 
    For Each ctl In Me.Sections.Item("Section1").Controls 
        If TypeName(ctl) = "RptTextBox" Then 
            Select Case ctl.Name 
            Case "Text1" 
            ctl.DataField = AdoRec.Fields("aa").Name 
            Case "Text2" 
            ctl.DataField = AdoRec.Fields("bb").Name 
            Case "Text3" 
            ctl.DataField = AdoRec.Fields("cc").Name 
        End Select 
        End If 
    Next 
End Sub

Answer 2

http://www.fixdown.com/soft/14867.asp  '水晶报表10.0(注册码Crystal Reports 10 Advanced Developer (build 10.0.0.53327) 序列号：License : AV860-01CS00G-U7000NC  SN : 1231467890)