Использование средств автоматизации Excel и VBA для разработки приложений обработки информации в системе управления базами данных - Контрольная работа

бесплатно 0
4.5 235
Характеристика проектирования и создания базы данных в среде Access. Проведение исследования возможностей создания пользовательского интерфейса на основе форм. Рассмотрение методов расширения функциональности приложений за счет сторонних компонент.

Скачать работу Скачать уникальную работу

Чтобы скачать работу, Вы должны пройти проверку:


Аннотация к работе
Dim y As Integer cmd = "Provider = Microsoft.Ace.OLEDB.12.0; Data Source =" & ACTIVEWORKBOOK.Path & "\BD.accdb;Persist Security Info=False" sql = "Select * From Tab_1" cn.CONNECTIONSTRING = cmd cn.Open rs.Open sql, cn i = 1 y = rs.Fields.Count - 1 Dim y As Integer cmd = "Provider = Microsoft.Ace.OLEDB.12.0; Data Source =" & ACTIVEWORKBOOK.Path & "\BD.accdb;Persist Security Info=False" sql = "Select * From Tab_2" cn.CONNECTIONSTRING = cmd cn.Open rs.Open sql, cn, ADOPENDYNAMICS i = 1 y = rs.Fields.Count - 1 Else cmd = "Provider = Microsoft.Ace.OLEDB.12.0; Data Source =" & ACTIVEWORKBOOK.Path & "\BD.accdb;Persist Security Info=False" sql = "Delete Tab_1.Kod, Tab_1.Nazv, Tab_1.adr FROM Tab_1 WHERE ((Tab_1.Kod)=" & x & ");" Else q = Chr(34) & q & Chr(34) cmd = "Provider = Microsoft.Ace.OLEDB.12.0; Data Source =" & ACTIVEWORKBOOK.Path & "\BD.accdb;Persist Security Info=False" sql = "DELETE Tab_2.kod, Tab_2.vid, Tab_2.kv1, Tab_2.kv2, Tab_2.kv3, Tab_2.kv4, Tab_2.sred FROM Tab_2 WHERE (((Tab_2.Kod)=" & x & ") AND ((Tab_2.vid)=" & q & "));" If Not ISNUMERIC(ko) Or Not ISNUMERIC(k1) Or Not ISNUMERIC(k2) Or Not ISNUMERIC(k3) Or Not ISNUMERIC(k4) Or Not ISNUMERIC(sre) Then GOTO Oshibka vi = Chr(34) & vi & Chr(34) cmd = "Provider = Microsoft.Ace.OLEDB.12.0; Data Source =" & ACTIVEWORKBOOK.Path & "\BD.accdb;Persist Security Info=False" sql = "UPDATE Tab_2 SET Tab_2.Kod =" & ko & ", Tab_2.vid =" & vi & ", Tab_2.kv1 =" & k1 & ", Tab_2.kv2 =" & k2 & ", Tab_2.kv3 =" & k3 & ", Tab_2.kv4 =" & k4 & ", Tab_2.sred =" & sre & "WHERE (((Tab_2.Kod)=" & x & ") AND ((Tab_2.

Список литературы
1. Джон Уокенбах. Excel 2010 Power Programming with VBA. Издательство: Вильямс 2011 г. - 944 стр. ISBN 978-5-8459-1721-8;

2. Игорь Гайдышев Решение научных и инженерных задач средствами Excel, VBA и C/C Издательство: БХВ-Петербург 2004 г. - 512 стр. ISBN 5-94157-477-0;

3. Ганс-Йоахим Берндт. Измерение, управление и регулирование с помощью макросов VBA в Word и Excel. Издательство: МК-Пресс 2008 г. - 256 стр.

4. Игорь Гайдышев Решение научных и инженерных задач средствами Excel, VBA и С/С Издательство: БХВ-Петербург 2004 г. - 512 стр.

Размещено на .ru

Вы можете ЗАГРУЗИТЬ и ПОВЫСИТЬ уникальность
своей работы


Новые загруженные работы

Дисциплины научных работ





Хотите, перезвоним вам?