1.工具中有Crystal Report Viewer 
2.是,要先設計報表,再用Crystal Report Viewer調用
3.可以Dim conn As SqlConnection
 Dim da As SqlDataAdapter
 Dim strSQL As String conn = New SqlConnection()
 conn.ConnectionString = "User ID=sa; PWD=1234;Data Source=xxxx; Initial Catalog =xxxxx"
 conn.Open() strSQL = "Select * from TableName"     
 da = New SqlDataAdapter(strSQL, conn)
 Dim ds As New DataSet()                    
 da.Fill(ds, "TableName")                         Dim RptDoc As New ReportName()   
  RptDoc.SetDataSource(ds)                      
 ' 給RptDoc 指定數據,   
  CrystalView1.ReportSource = RptDoc      '給CrystalView指定數據
  CrystalView1.DataBind()
  conn.Close()