Отчеты в Visual Studio

Средства создания отчетов

Обычные офисные средства, такие, как Microsoft Office, с интегрированными

Технология COM

Технология COM

(Component Object Model — компонентная объектная модель), разработанная компанией Microsoft

1. Подключение библиотек

Project ? Add Reference ? закладка COM ? выбрать

2. Ссылка на пространство имен (для удобства)

Imports Microsoft.Office.Interop,
где Interop ( от

3. Создание необходимых объекты – экземпляров класса

Объектная модель Excel

Объект Application –приложение Excel

Объект Application – свойства

Объект Application –методы

Объект Application - Программно в VisualStudio
Dim ЗадайтеИмяПеременнойExcel As New Excel.Application
ИмяПеременнойExcel.Visible =

Объект WorkBook – рабочая книга

WorkBook – свойства

WorkBook – методы

WorkBook – методы

Объект WorkBook - Программно в VisualStudio

Dim ЗадайтеИмяПеременнойРабочейКниги As Excel.Workbook
ИмяПеременнойРабочейКниги = ИмяПеременнойExcel.Workbooks.Add

Объект WorkSheet – рабочий лист

WorkSheet – Свойства

WorkSheet – Свойства

Объект WorkSheet - Программно в VisualStudio

Dim ЗадайтеИмяПеременнойРабочегоЛиста As New Excel.Worksheet
ИмяПеременнойРабочегоЛиста =
ИмяПеременнойРабочейКниги.Worksheets(1)
ИмяПеременнойРабочегоЛиста.Activate()

Объекты Range, Cell - диапазон ячеек и ячейка

Range – Свойства

Range – Свойства

Range – Свойства

Объекты Range, Cell - Программно в VisualStudio

ИмяПеременнойРабочегоЛиста.Cells(1, 1) = "Заказы“
ИмяПеременнойРабочегоЛиста.Range("a1").Value =

Итого “Cоздание отчета БД в Excel”

Подключить библиотеки Microsoft Excel 11.0 Object

Программно или мастером создать автономный или подключенный объект ADO для получения

Пример 1 -

Использоване функцй Excel в приложении VS

Форма

Подключить библиотеки, добавить ссылку на пространство имен

Подключить библиотеки Microsoft Excel 11.0

Обработчик на кн. «Вычислить»

Dim xlApp As New Excel.Application
Dim L As Single
L

Пример 2

Работа с рабочими листами

Форма и результат выполнения

Обработчик на кнопку

Dim xlApp As New Excel.Application
xlApp.Visible = True
Dim xlBook As

Обработчик на кнопку

'Добавляем данные
xlSheet.Cells(1, 2) = 5000
xlSheet.Cells(2, 2) = 75
xlSheet.Cells(3, 1)

Пример 3

Создание отчета для таблицы Модели в Excel

Форма и результат

Обработчик

Dim xlApp As New Excel.Application
xlApp.Visible = True
Dim xlBook As Excel.Workbook
xlBook

Обработчик

xlSheet.Cells(1, 1).Value = "Таблица модель"
'Форматируем ячейку жирным шрифтом
xlSheet.Range("a1").Font.Bold =

Обработчик

Dim cn As New SqlConnection
Dim strsql As String
cn.ConnectionString =

Обработчик

Dim i As Integer = 3
While rdr.Read
'Добавляем данные
xlSheet.cells(i,

Обработчик

'Отображаем лист
xlSheet.Application.Visible = True
cn.Close()

Результат