End Sub

Option Explicit

End Sub

End Sub

Option Explicit

Option Explicit

Dim a As Integer ' число 1

Dim b As Integer ' число 2

Dim c As Integer ' результат

Все переменные объявлены как целые числа.

Второй вариант объявления переменных с помощью идентификатора приведён ниже:

Dim a % ' число 1

Dim b % ' число 2

Dim c % ' результат

Откройте Окно формы и дважды щёлкните по объекту Command1. В Редакторе кода будут сформированы первая и последняя строки процедуры обработки событий (щелчок по кнопке «Вычислить»):

Private Sub Command1_Click()

Напишите следующую последовательность строк программного кода данной процедуры:

Private Sub Command1_Click()

a = CInt(Text1)

b = CInt(Text2)

c = a + b

Text3.Text = CStr(c)

a = CInt(Text1) – присвоение значений данных, занесённых в текстовое поле Text1 переменной a.

Поле Text1 содержит текстовую информацию, а переменная a объявлено как число. Во избежание несоответствия типов данных, текстовая информация должна быть преобразована в числовую.

Для этих целей использована стандартная функция CInt. В скобках указан аргумент – текстовое поле.

b = CInt(Text2) – присвоение значений данных, занесённых в текстовое поле Text2, переменной b.

c = a + b – суммирование и пересылка результата в переменную c.

CStr(c) – функцияпреобразования числового значения, содержащегося в переменной, в текстовую информацию. Cstr – функция, с – аргумент (переменная).

Text3.Text = CStr(c) – присвоение значения, возвращаемого функцией, свойству Text текстового поля Text3.

Программный код модуля формы содержит одну процедуру обработки событий:

Dim a As Integer ' число 1

Dim b As Integer ' число 2

Dim c As Integer ' результат

Private Sub Command1_Click()

a = CInt(Text1)

b = CInt(Text2)

c = a + b

Text3.Text = CStr(c)

Проверьте работу приложения в режиме интерпретации.

Создайте в собственной папке папку Переменные. Сохраните в ней проект. Выполните компиляцию. Закройте Visual Basic.

В проводнике Windows откройте папку Переменные и загрузите файл. Проверьте корректность работы созданного приложения.

Вопросы для самоконтроля:

1. Основные компоненты Интегрированной среды разработки Visual Basic и их назначение.

2. Компоненты программного кода Visual Basic (модули, процедуры и функции).

3. Структура процедуры и функции, их отличие.

4. Переменные и константы, типы данных.

5. Объявление переменных, идентификаторы.

6. Назначение оператора Option Explicit.

7. Создайте программный код вывода на экран текстовой информации.

8. Создайте программный код вычисления разности двух чисел.

9. Создайте программный код расчёта удельного веса объёма производства отрасли (V отрасли) в общем объёме (V пром.).Удельный вес рассчитывается по формуле:

У отрасли = (V отрасли / V пром.) * 100%.

10. Создайте программный код расчёта удельного веса работников отрасли (Ч отрасли) в общей численности работников занятых в производстве (Ч пром.).Удельный вес рассчитывается по формуле:

У отрасли = (Ч отрасли / Ч пром.) * 100%.

11. Создайте программный код расчёта эффективности производства. Э = Р / З (Р – результаты, З – затраты).

Дата добавления: 2014-12-27