.Net水晶報(bào)表怎么用

小編給大家分享一下.Net水晶報(bào)表怎么用，相信大部分人都還不怎么了解，因此分享這篇文章給大家參考一下，希望大家閱讀完這篇文章后大有收獲，下面讓我們一起去了解一下吧！

1、新建一個(gè)windows application：CristalTest;

2、新添加一個(gè)數(shù)據(jù)集DataSet1.xsd

3、在DataSet1里添加表DataTable1 在DataTable1里添加四列Column1,Column2,Column3,Column4 ,保存

4、添加一個(gè)水晶報(bào)表文件CrystalReport1.rpt 設(shè)置數(shù)據(jù)源：

項(xiàng)目數(shù)據(jù)(Project Data)-->Ado.net DataSets-->***.DataSet1-->DataTable1

5、把Column1,Column2,Column3,Column4拖到水晶報(bào)表的細(xì)節(jié)( Details )中

6、添加一個(gè)控件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.DataImports System.Data.SqlClient

9、 m_strSqlConn = "Data Source=localhost;

initial catalog=pubs;   User id=sa;

password="這個(gè)可能要修改成你的機(jī)器的Sql Server連接信息

以上是“.Net水晶報(bào)表怎么用”這篇文章的所有內(nèi)容，感謝各位的閱讀！相信大家都有了一定的了解，希望分享的內(nèi)容對(duì)大家有所幫助，如果還想學(xué)習(xí)更多知識(shí)，歡迎關(guān)注億速云行業(yè)資訊頻道！