Реферат Курсовая Конспект
Dim rs As DAO.Recordset - раздел Философия, по ДИСЦИПЛИНЕ «ИНФОРМАТИКА И КОМПЬЮТЕРНАЯ ТЕХНИКА» Тема: «СИСТЕМА УПРАВЛЕНИЯ БАЗАМИ ДАННЫХ ACCESS» Set Db = Currentdb Set Rs = Db.openrecordset("товар...
|
Set db = CurrentDb
Set rs = db.OpenRecordset("Товары")
With rs
.MoveFirst
Me![Стоимость кофе] = 0
Do While .EOF = False
If .Fields("Марка") Like "Кофе*" Then Me![“Стоимость кофе”] = _
Me![“Стоимость кофе”] + .Fields("Стоимость товара")
.MoveNext
Loop
End Wtth
End Sub
Рис. 2.5. Форма “Товары”
Пример 2. Найти и вывести на экран номер группы с максимальным количеством студентов и средним баллом в группе более 4,7 в таблице "Группа".
Private Sub Поиск_Номер_Группы()
Dim db As Database
Dim rs As DAO.Recordset, max As Single, n As Variant
Set db = CurrentDb
Set rs = db.OpenRecordset("ГРУППА")
With rs
.MoveFirst
max = .Fields(1)
.MoveNext
Do While .EOF = False
If .Fields(1) > max And .Fields(2) > 4.7 Then max = .Fields(1): n = .Bookmark
.MoveNext
Loop
.Bookmark = n
MsgBox "Количество студентов - " & max & Chr(13) & "Номер группы - " & _
.Fields(0)
End With
End Sub
Пример 3.Используя библиотеку ADO в окне модуля создать процедуру для заполнения данными поле “Среднее” таблицы “Урожайность” (рис. 2.6).
Рис.2.6. Структура таблицы “Урожайность”
Public Sub Расчет_ADO()
Dim connection As New ADODB.connection 'Если база днных текущая, то
'эту строку можно не писать
'Если базу данных нужно открыть на диске, то после этой строки нужно писать
'Connection.Open "Provider=Microsoft.Jet.OLEDB.4.0";Data Sourse=путь к файлу"
Dim rs As New ADODB.Recordset
Dim s As Double, i As Integer, n As Long
With rs
.Open "Урожайность", CurrentProject.connection, adOpenKeyset, adLockOptimistic
.MoveFirst
Do While .EOF = False
s = 0: n = 0
For i = 1 To .Fields.Count - 2
s = s + .Fields(i): n = n + 1
Next i
s = s / n
.Fields(5) = s
.MoveNext
Loop
End With
End Sub
3. СПИСОК ЛИТЕРАТУРЫ
1. Джон Вейскас. Эффективная работа с Microsoft Access 7.0 для Windows .- С-Пб.:Питер, 1997.
2. М.Хэлворсян, М.Янг. Эффективная работа с Microsoft Office 97.- С-Пб.:Питер, 1997.
3. МакФедризг Пол и др. Microsoft Office 97. Энциклопедия пользователя: пер. с англ.-К.: Издательство "ДиаСофт", 1998.
4. К. Гетц, М. Джилберт. Программирование в Microsoft Office. Полное руководство по VBA: пер. с англ.-К.: Издательская группа BHV, 1999.
5. Киммел, Пол. Освой самостоятельно программирование для Microsoft Access 2000 за 24 часа.: пер. с англ.-М.:"Вильямс". 2000.
6. Король В.И. Visual Basic 6.0, Visual Basic for Application 6.0. Язык программирования. Справочник с примерами.-М.: КУДРИЦ-ОБРАЗ, 2000.
7. Каммингс С. VBA для “чайников”: Пер. с англ.: М.:”Вильямс”, 2000.
8. Кен Гетц, Майк Джилберт. Программирование в Microsoft Office: пер. с англ.-К:”Ирина”. BHV, 2000.
9. С.Браун. Visial Basic: учебный курс. – СПб.: Питер, 2001.
10. Ю. Бекаревич, Н. Пушкина. Microsoft Access 2002. –СПб.: БХВ-Петербург, 2003.
4. СОДЕРЖАНИЕ
1. ОСНОВЫ ТЕХНОЛОГИИ MICROSOFT ACCESS………………………………………2
1.1.Введение………………………………………………………………………………. 2
1.2. Что такое базы даннях?................................................................................................2
1.3. Архитектура Microsoft Access……………………………………………………….2
1.4. Создание базы даннях.Создание таблиц. Связывание таблиц.................................3
1.5. Изменение проекта базы даннях.................................................................................9
1.6. Сздание запросов.......................................................................................................11
1.7. Создание и редактирование форм............................................................................ 16
1.8. Создание и редактирование отчетов.........................................................................20
1.9. Создание и применение макросов.............................................................................25
2. РАЗРАБОТКА ПРИЛОЖЕНИЯ ПОЛЬЗОВАТЕЛЯ С ИСПОЛЬЗОВАНИЕМ VBA ...28
2.1. Введение.....................................................................................................................28
2.2. Модули Access……………………………………………………………………...28
2.3. Классы и семейства...................................................................................................28
2.4. Объектные модули Microsoft Office………………………………………………..28
2.5. Модели объектов Microsoft…………………………………………………………29
2.6. Модели объектов доступа к данням DAO и ADO………………………………...29
2.7. Ссылки на объекты.....................................................................................................29
2.8. Свойства и методы объектов……………………………………………………….30
2.9. Применение метода DoCmd в программах VBA ....................................................30
2.10.Работа с объектами доступа к данным......................................................................33
3. СПИСОК ЛИТЕРАТУРЫ..................................................................................................37
– Конец работы –
Эта тема принадлежит разделу:
Одесская Национальная Академия Пищевых... Технологий...
Если Вам нужно дополнительный материал на эту тему, или Вы не нашли то, что искали, рекомендуем воспользоваться поиском по нашей базе работ: Dim rs As DAO.Recordset
Если этот материал оказался полезным ля Вас, Вы можете сохранить его на свою страничку в социальных сетях:
Твитнуть |
Новости и инфо для студентов