• Гідрологія і Гідрометрія
• Господарське право
• Економіка будівництва
• Економіка природокористування
• Економічна теорія
• Земельне право
• Історія України
• Кримінально виконавче право
• Медична радіологія
• Методи аналізу
• Міжнародне приватне право
• Міжнародний маркетинг
• Основи екології
• Предмет Політологія
• Соціальне страхування
• Технічні засоби організації дорожнього руху
• Товарознавство продовольчих товарів

End Sub

End Type

End Sub

End Type

End Type

Типи даних, що визначаються користувачем

Крім вбудованих типів даних, таких як Integer, Long та інших можливе використання типів даних які задає користувач. Такі типи даних створюються на основі вбудованих так і раніш створених типів даних користувачем. Основне правило яке потрібно знати це те що коли в об’єкт, елемент управління чи дані вкладений другий об’єкт або елемент управління, дані чи властивість то вони відокремлюються комою. Таким чином доступ до елементів змінної типу даних, що визначаються користувачем здійснюється аналогічно доступу до властивостей елемента керування, тобто це значення яке одержує елемент і встановлюється після крапки імені змінної. Область видимості таких типів даних буде аналогічно області видимості звичайної змінної.

Що визначити призначений для користувача тип даних, використовується ключове слово Type:

[Public або Private] TypeІм’я типу

Елемент 1 As Тип

Елемент 2 As Тип

.............................

Наприклад визначимо тип даних Службовець для користувача :

(General) (Declaration) (Module)

TypeСлужбовець

Табельний номер As Integer

ПрізвищеAs String *17

Name As String *17

По батьковіAs String *17

Рік народженняAs Date

Тепер використаємо визначений тип даних Службовець для змінної Відомості.

(General) (Declaration) (Form)

DimВідомості AsСлужбовець

Private Sub Command1_Click ()

Відомості. Прізвище = “Косенко”

Відомості. Name = “Ілля”

Відомості. По батькові = “Степанович”

Змінні однакового типу можна присвоювати не за елементами, а за напрямком. Наприклад:

(General) (Declaration) (Module)

TypeСлужбовець

ПрізвищеAs String *17

Name As String *17

PublicВідомості AsСлужбовець, Запис As Службовець

Private Sub Command1_Click ()

Відомості. Прізвище = “Косенко”

Відомості. Name = “Ілля”

Запис = Відомості

Змінні Відомості і Запис належать до одного типу Службовець. Тому їхні значення можуть присвоюватись напрямку.

Типи даних, що визначаються користувачем, рекомендується використовувати для оброблення даних незмінної структури.

Оброблення файлів і файлові функції

Файл – це іменована послідовність однорідних компонентів, що зберігаються на носіях інформації. Кількість записів у файлі чітко не фіксується і може змінюватися. Будь – який файл можна розглядати як доступну область зовнішньої пам’яті з певним ім’ям, в якій зберігається деяка сукупність даних.

Операційна система або будь який додаток зв’язується з файлом за допомогою каналу введення –виведення. Під час відкривання файлу ставиться у відповідність канал, за допомогою якого записуються або прочитуються дані. Для того . що узнати вільний канал для доступу до файлу використовується функція Free File (Range Number). Якщо Range Numberдорівнює 0 то номер каналу може бути від 1-255, а якщо Range Number дорівнює 1 то від 256-511. Якщо вільних каналів немає то виникає помилка IntFH = Free File().

Процес відкривання і збереження файлів складається з кількох етапів:

Здобуття дескриптора файлу (handle).

Відкривання файлу.

Читання або запис даних.

Закриття файлу.

Типи доступу до файлів. Тип даних, що міститься у файлі, визначає тип доступу до нього. У Visual Basic є три доступу до файлів:

послідовний – для читання та запису текстових файлів;

довільний – для читання і запису тексту або структурованих двійкових файлів із записами фіксованої довжини.

двійковий – для читання та запису довільно структурованих файлів.

Відкривання файлів для послідовного доступу. Файли , відкриті для послідовного доступу, допускають такі операції:

Виведення символів із створеного додатку – записати дані із додатку у зовнішній файл (Output).

Додавання символів із додатку у зовнішній файл (Append).

Введення символів у додаток – прочитати додатком дані зі створеного зовнішнього файлу (Input).

Що відкрити файл для послідовного доступу, потрібно використати такий синтаксис оператора Open:

OpenІм’я файлуFor [Input/Output/Append] As file handle

[Len=buffersize]

Наприклад:

Open ”C:\ Readme.txt” For Input As#1

Open ”C:\ Readme.txt” For Output Input As#1

Open ”C:\ Readme.txt” For Append As#1

У кінці рядка вказується номер каналу. що повертається функцією FreeFile.

Після відкривання файлу та виконання операцій Input, Input, Append, його потрібно закрити оператором Close.

Читання даних з файлу. Читання даних з файлу. Відкритого для послідовного доступу, здійснюється за допомогою оператора Input, що має кілька різновидів:

Line Input # - прочитує один рядок та привласнює весь рядок змінній записаній після оператора Line Input #.

Input # - прочитує послідовність символів, записаних за допомогою оператора Write # та привласнює значення відповідних символів відокремлених роздільними знаками, змінним, які записуються після оператора Input #.

Input$ - прочитує певну кількість символів.

Найчастіше використовуються два перших оператора.

Є кілька варіантів читання всієї інформації з файлу.

Наприклад:

1- й варіант

Open ”C:\ Readme.txt” For Input As#1

Do While Not EOF (1)

Line Input #1, Рядок$

MsgBox Рядок$, 0, “Вивід даних”

Loop

Close #1

2 – варіант

Рядок$ = Input$(LOF(1),#1)

Close #1

Функція EOF (End Of File) повертає значення True після досягнення кінця файлу. Функція LOF(Length Of File) дає змогу визначити довжину файлу в байтах.

Для присвоєння даних змінним замість Line Input #1 використовується Input #1, V1, V2, V3.......( V1, V2, V3 – це змінні яким привласнюється значення рядка зовнішнього файлу.

Запис у файл. Для запису інформації у файл використовуються оператори: Print # та Write #. Синтаксис операторів запису у файл:

Print #/Write # file Handle, [{Spc(n)/Tab(n)}][expression]

Така запис означає, що оператори Print # та Write # мають однаковий формат. Наприклад, Write # 1,Фрагмент 1, Фрагмент 2.

Фрагментами можуть бути елементи керування в які вводяться дані, наприклад Write # 1,txtКод_продукції, txtНайменування, txtПідприємство,txtКількість,

txtЦіна. Довільний та двійковий доступи до файлів розглядаються в спеціальній літературі.

7. Використання процедур і функцій для розв’язання задач з економіки

Процедура – це підпрограма або закінчений фрагмент програми який має ім’я. Процедури бувають системні і власні. Власні процедури створює користувач. Ім’я системної процедури складається з імені об’єкта й імені події, перед іменем об’єкта ставиться оператор Sub. Так як системна процедура відноситься до певного елемента керування то перед оператором Sub ставиться оператор Private.

Наприклад.

Private Sub CommandButton1_Click()

...................................................

Переглядів: 427