“ReportViewer1 (1 project) E

Автор admin Пятница, 5 февраля 2010 10:16

“ReportViewer1 (1 project) E ReportViewer Ei tS References -^g) Assembrylnfcvb ‘ @ eomptex-rpt y» Solution Explorer Properoes J® Index] A*c. ?.7. Окно проводника решений с добавленными новыми файлами Выполните сборку решения (для этого можно воспользоваться комбинацией клавиш Ctrl+Shift+B). Измените код обработчика события Buttonl_Click на что-то, подобное показанному ниже: Private Sub ButtonljClick(ByVal sender As System.Object, ? _ ByVal e As System.EventArgs) Handles Buttonl.Click Select Case Comboboxl.Selectedltem Case “Simple Report” Dim simpleReport As New simple() CrystalReportViewerl.ReportSource ж simpleReport CrystalReportViewerl .Visible *¦ True Case “Complex Report” Dim complexReport As New complex () CrystalReportViewerl.ReportSource^ « complexReport CrystalReportViewerl.Visible » True Case Else MsgBox(“Пожалуйста, выберите отчет ив списха”) End Select End Sub Выполните сборку и запустите приложение. После загрузки приложения выберите простой отчет (Simple Report), и он будет корректно отображаться в модуле просмотра (рис. Б.8). Предположительно, использование более экзотических