Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Методичка_VB_Палагута.doc
Скачиваний:
2
Добавлен:
14.11.2019
Размер:
15.15 Mб
Скачать

Реєстр листків по тимчасовій непрацездатності

Прізвище

Номер

лікарняного листка

Сума оплати за день

Число днів хвороби

Сума

*

Підсумок:

*

*

Варіант №13

Створити програму, що дозволяє обробити такі дані:

Відомість відрахувань із зарплати

П ІБ

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

Види відрахувань

Разом

відраховано

аванс

прибутковий податок

за покупку товарів у кредит

* (гр.3+гр.4+гр.5)

Разом:

*

*

*

*

Варіант №14

Створити програму, що дозволяє обробити такі дані:

Меню на відпустку харчування співробітникам столової

Найменування

блюда

Кількість

По цінах відпустки

По обліковим цінам

виробництва

ціна

сума

ціна

сума

* (гр. 3*гр.2)

* (гр.5*гр.2)

Підсумок:

*

*

*

Варіант №15

Створити програму, що дозволяє обробити такі дані:

Аналіз забезпеченості кадрами

Професія

Чисельність працюючих

Відхилення

Коефіцієнт забезпеченості

за планом

фактично

(+, -)

%

гр.3-гр.2

100-(гр.3*100/гр.2)

* (гр.3/гр.2)

Підсумок:

*

*

*

*

*

4.5 Тест

Відповідь

Вміє

Не вміє

  1. Скільки елементів вміщує масив змінних, який оголошено DIM X(8)?

    1. 8

    1. 9

    1. 7

  1. Які ствердження є правильними?

    1. Якщо обрати пункт меню Розрахунок, ім’я якого mnuSolve , то буде виконано процедуру nmuSolve_Change()

    1. Якщо обрати пункт меню Работа, ім’я якого mnuRun , то буде виконано процедуру nmuRun_Click()

    1. Якщо обрати пункт меню Розрахунок, ім’я якого mnuSolve , то буде виконано процедуру nmuSolve_Load()

  1. Щоб створити меню програми слід подати команду ...

    1. Tools - Menu Editor

    1. View - Menu Editor

    1. Project – Add Form

  1. Які дії виконує наступний фрагмент коду?

Private Sub mnuC_Click()

For i = 0 to 3

If val(lblN(i).Caption)>0 Then

lblN(i).Caption = “ ”

End If

Next

End Sub

    1. знищує вміст 4-ох елементів масиву етикеток

    1. знищує вміст 3-ох елементів масиву етикеток, значення яких більше 0

    1. знищує вміст 3-ох елементів масиву етикеток, значення яких більше 0

  1. Для зміни порядку підпорядкованості елементів меню у вікні редактору меню використовуються кнопки ...

    1. Next

    1. , 

    1. Insert

  1. Яких помилок припущено у фрагменті коду?

Sum = 0

For m = 0 to 4

Sum = Sum + X(i)

Next

    1. індексація елементів масиву починається з 0, а не з 1

    1. відсутнє слово Then

    1. X(i) замість X(m)