Подякувати Студентському архіву довільною сумою
Admin
26.02.2023 12:38
Дякуємо, що користуєтесь нашим архівом!
Модулі в базах даних
Інформація про навчальний заклад
ВУЗ:
Національний університет Львівська політехніка
Інститут:
О
Факультет:
КН
Кафедра:
Кафедра САПР
Інформація про роботу
Рік:
2008
Тип роботи:
Звіт про виконання лабораторної роботи
Предмет:
Організація баз даних і знань
Частина тексту файла (без зображень, графіків і формул):
Міністерство освіти і науки України
Національний університет «Львівська політехніка»
Кафедра САПР
ЗВІТ
про виконання лабораторної роботи №10
на тему: «Модулі в базах даних»
з курсу: «Організація баз даних і знань»
Завдання до лабораторної роботи
Розробка модулів.
Мета
Здобути навички в розробці модулів для Access на мові програмування Visual Basic.
Хід роботи.
В даній лабораторній роботі я розробив програму, яка обраховує різницю часу між двома введеними датами у хвилинах
Option Compare Database
Public Function WorkdayTime(ByVal BeginTime As Date, ByVal EndTime As Date) As Single
Dim NewEnd As Date
Dim ET As Double
Dim DOW As Integer
Const WEEKDAYOFFHRS = 840
Const WEEKENDOFFHRS = 1440
Const FIRSTWORKDAY = vbMonday
Const WORKDAYS = 5
ET = DateDiff("n", BeginTime, EndTime)
NewEnd = EndTime
Do While DateDiff("d", BeginTime, NewEnd) > 0
DOW = Weekday(NewEnd, FIRSTWORKDAY)
NewEnd = DateAdd("d", -1, NewEnd)
Loop
If ET < 0 Then
WorkdayTime = DateDiff("n", BeginTime, EndTime)
Else
WorkdayTime = ET
End If
End Function
Висновок: На даній лабораторній роботі я ознойрмився з мовою програмування Visual Basic та розробив модуль для своєї бази даних.
Ділись своїми роботами та отримуй миттєві бонуси!
0%
Оголошення від адміністратора