Paolo Tansengco Ответов: 2

Как правильно использовать crystalreport на VB


Привет, кто-нибудь может научить или направить меня по кодам crystal report? Даже самые простые. Он мне очень нужен для моего проекта. Я сделал код, но не знаю, правильный ли он, и он не работает. Вот мой код.

Private Sub btnAPrint_Click(sender As Object, e As EventArgs) Handles btnAPrint.Click
        Dim report As New ReportDocument
        report.Load("AttendanceReport.rpt")
        report.RecordSelectionFormula = "{tblAttendance.Date=}" & DTPAttendance.Text
        docprint.CrystalReportViewer1.ReportSource = report
        docprint.CrystalReportViewer1.Refresh()
        docprint.Show()
    End Sub


Что я уже пробовал:

Я попытался создать свой собственный код. Но я действительно ничего не знаю о хрустальных отчетах.

[no name]

https://www.google.com/webhp?sourceid=chrome-instant&ion=1&espv=2&ie=UTF-8#q=vb.net%20crystal%20reports

2 Ответов

Рейтинг:
5

Maciej Los

На первый взгляд нижеприведенная часть неверна:

report.RecordSelectionFormula = "{tblAttendance.Date=}" & DTPAttendance.Text


Так и должно быть:
report.SelectionFormula = "{tblAttendance.Date}=#" & DTPAttendance.Text & "#"


Для получения более подробной информации, пожалуйста, смотрите:
Создание отчета с Формулой выбора[^]
Настройка Формулы выбора вручную в коде[^]
Нажатие вниз выбор записи на сервер базы данных[^]
Учебные пособия[^]

Проверять КП КБ[^] тоже!


Richard Deeming

Разве это не должно быть: {tblAttendance.Date}=... - Я не думаю, что ... = является частью имени столбца. :)

Maciej Los

Так и должно быть. - Спасибо, Ричард.

Paolo Tansengco

@Maciej Los это все еще не работает.
А линия

report.SelectionFormula

не существует
Там написано.
Здесь требуется строка. Подробности: errorKind
Ошибка в Формуле Record_Selection:
- {tblAttendance.Дата}=#9/20/2016#'
Здесь требуется строка.
Подробности: errorKind

Paolo Tansengco

Теперь это работает. Я изменил формулу на.

docprint.CrystalReportViewer1.SelectionFormula = "{tblAttendance.Date}=""" & DTPAttendance.Text & """"


Спасибо тебе, Мацей!

Рейтинг:
18

Paolo Tansengco

report.SelectionFormula = "{tblAttendance.Date}=""" & DTPAttendance.Text & """"


Maciej Los

5ед!