Crystal Report + VB.NET 最基本顯示 (無連結 Database) |
基本條件:
|
Imports CrystalDecisions.CrystalReports.Engine Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim cr As New ReportDocument cr.Load("C:\Inetpub\web\pro1\WindowsApplication2\WindowsApplication2\1.rpt") CrystalReportViewer1.ReportSource = cr CrystalReportViewer1.Refresh() CrystalReportViewer1.Visible = False End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click CrystalReportViewer1.Visible = True End Sub End Class |