Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
УчебноеПособие по VB_6.doc
Скачиваний:
21
Добавлен:
24.12.2018
Размер:
3.17 Mб
Скачать

3.1.4. Упражнение: типы переменных

Задача 3.1. Вычисление определенного интеграла.

Вычислите определенный интеграл на отрезке интегрирования [a,b]. Разработайте форму для вычисления определенного интеграла. Выведите на форму результат вычисления и список переменных и их типов.

Порядок работы:

  • Запустите программу Visual Basic и откройте новый проект Standard EXE.

  • Установите режим контроля объявления типов переменных: введите команду Tools\Options\Editor, установите флажок Require Variable Declaration.

  • Выберите метод и разработайте алгоритм для вычисления определенного интеграла с заданной точностью.

  • Разработайте эскиз формы для вычисления определенного интеграла. (рис.3.3.).

  • Пример программы вычисления определенного интеграла методом левых прямоугольников. Заданная функция у=х:

Option Explicit

Dim a As Single, b As Single, S As Single, N As Integer

Dim x As Single, dx As Single

Dim y As Single, i As Integer

Sub Form_Load()

' Центрирование формы

Left = (Screen.Width - Me.Width) / 2

Top = (Screen.Height - Me.Height) / 2

End Sub

Sub Command1_Click() ‘ Вычисление интеграла

Dim y As Single, i As Integer

a = Val(Text1.Text)

b = Val(Text2.Text)

N = Val(Text3.Text)

S = 0

x = a: dx = (b - a) / N

For i = 1 To N

y = x

S = S + y * dx

x = x + dx

Next I

Text4.Text=Str(S)

End Sub

Private Sub Command2_Click()

‘ Выход из программы

Unload Me

End Sub

  • Опишите все переменные, используемые в программе, и их типы по следующей форме:

Таблица 3.2

Описание типов переменных

Обозначение переменной

Имя

переменной

Тип

переменной

Значение

Комментарий

a

a

Single

0,5

Нижний предел

интегрирования

  • Напишите текст программы и запустите программу. Устраните все ошибки, которые могут выявиться при запуске программы.

  • Сохраните программу на диске командой File\Save Project As.

  • Вычислите определенный интеграл для функции у=х на отрезке [0,1] и сравните полученный результат с контрольным значением – 0,5. Число отрезков разбиения должно быть четным. Увеличьте число отрезков разбиения и сравните полученные результаты. С увеличением числа отрезков разбиения точность вычисления интеграла увеличивается.

  • Замените функцию y=x одной из предложенных в задании и вычислите интеграл.

  • Сохраните программу на диске командой File\Save Project.

  • Выведите на печать текст программы командой File\Print (настройку окна диалога Print , установленную по умолчанию, не изменяйте).

  • Создайте исполняемый файл командой Make Project1.exe ...

  • Закройте программу Visual Basic.

  • Запустите исполняемый файл программы для проверки работы.

3.1.5. Закрепление материала

1. Поясните структуру проекта в Visual Basic.

2. В чем состоит отличие формы от модуля?

3. Расскажите назначение окна кода и его элементов.

4. Какие средства редактирования и ускорения ввода программы в окне программы имеет Visual Basic?

5. Приведите синтаксис присвоения значений переменным и свойствам объектов.

6. Назовите основные типы переменных и констант в VB.

7. Какие способы объявления типов переменных применяются в VB?

8. Как обеспечить контроль типов переменных?

9. Какие операторы используются для объявления типов переменных по умолчанию?

10. Поясните, что такое область видимости и время жизни переменных?

11. Как обеспечить сохранность данных при выходе из процедуры?

12. Как можно получить сведения обо всех константах используемых в проекте и константах VB?