Пожалуйста, я новичок в программировании, может ли кто-нибудь любезно помочь мне в просмотре отчетов? Мои коды приведены ниже, но отчет не появляется
Дим ДТ в качестве нового объекта DataTable
Dim ds как новый набор данных
Dim bs как новый BindingSource
Dim rds как новый ReportDataSource
Dim cmd как новая команда SqlCommand
Использование con в качестве нового SqlConnection("server=kwame\SQLEXPRESS;Database=HRM;Trusted_Connection=YES;")
против.Открыть()
УМК.Свойства commandtext = "выбрать * из монитора где имя ='" &ампер; элемент combobox1.Текст &ампер; "'"
Dim adp как новый SqlDataAdapter(cmd)
АДП.Заполнить(ДТ)
Конец Использования
БС.Источник данных = ДС
bs.DataMember = "монитор"
РДС.Name = "Монитор"
РДС.Стоимость = БС
ReportViewer1.LocalReport.Источники Данных.Добавить(rds)
Меня.Показать()
ReportViewer1.RefreshReport()
Что я уже пробовал:
различные коды онлайн, но, похоже, не работают для меня