經(jīng)常有網(wǎng)友問這個問題，長時間不看自己也忘記了，今天又碰到一個網(wǎng)友提問，沒轍，花了點下班時間把幾個步驟記錄如下，請指正！

1、新建一個windows application：cristaltest;

2、新添加一個數(shù)據(jù)集dataset1.xsd
3、在dataset1里添加表datatable1
在datatable1里添加四列column1,column2,column3,column4 ,保存
4、添加一個水晶報表文件crystalreport1.rpt
設置數(shù)據(jù)源：項目數(shù)據(jù)（project data）-->ado.net datasets-->***.dataset1-->datatable1
5、把column1,column2,column3,column4拖到水晶報表的細節(jié)(details)中
6、添加一個控件crystalreportviewer1到form1中

7、然后添加form1_load的代碼 

        dim m_sqlconn as sqlconnection
        dim m_strsqlconn as string
        m_strsqlconn = "data source=localhost; initial catalog=pubs;user id=sa;password="
        m_sqlconn = new sqlconnection(m_strsqlconn)
        try
            dim sqladp as sqldataadapter
            dim strsql as string
            dim ds = new dataset()
            m_sqlconn.open()
            strsql = "select au_lname as column1, au_fname as column2, phone as column3, address as column4 from dbo.authors"
            sqladp = new sqldataadapter(strsql, m_sqlconn)
            sqladp.fill(ds)

            dim crreportdocument = new crystalreport1()
            crreportdocument.setdatasource(ds.tables(0))
            crystalreportviewer1.reportsource = crreportdocument
        catch ex as exception
            messagebox.show(ex.tostring())
        end try

8、在form1.vb文件頭加

imports system.data
imports system.data.sqlclient 
9、 m_strsqlconn = "data source=localhost; initial catalog=pubs;user id=sa;password="這個可能要修改成你的機器的sql server連接信息