Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
44
Добавлен:
27.04.2015
Размер:
959.32 Кб
Скачать

Тема 4.3.1. Лабораторная работа «Структура VB-программ и процедуры. Средства программирования алгоритмов линейной структуры»

Перейти кЛП 4.2 ЛП 4.4 Огл.

Цель выполнения данной лабораторной работы состоит в получении практических навыков разработки, написания и отладки последовательных программ с использованием процедур, а также в изучении средств отладки.

4.3.1.Вопросы, подлежащие изучению

1.Средства процедурного программирования в VB.

2.Средства описания процедур в VB.

3.Преимущества программ, имеющих процедуры.

4.Обмен данными между процедурами.

5.Фактические и формальные параметры.

6.Способы передачи параметров по значению и адресу.

7.Отличия в передаче значения результата выполнения функций и подпрограмм.

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

9.Особенности составления схем алгоритмов, использующих процедуры.

4.3.2.Задание (состоит из двух частей)

1.Часть 1:

1.1.Для первой части задания выбрать вариант из таблицы 4.2-1 по усмотрению преподавателя.

1.2.Для выбранного варианта разработать три процедуры пользователя для вычисления заданного арифметического выражения: процедуру-функцию с формальными параметрами, процедуру-подпрограмму с формальными параметрами и процедуру без параметров (передача данных через глобальные объекты).

1.3.Разработать алгоритмы решения заданной задачи и представить их в виде схем алгоритмов.

1.4.Создать решение, содержащее три проекта, каждый из которых использует модуль формы, одну из разработанных в п.2 процедур пользователя, вычисляющую заданное арифметическое выражение, и событийную процедуру, в которой осуществляется ввод исходных данных, вызов процедуры п.2 и вывод результатов.

1.5.Выполнить созданные проекты и получить результаты.

1.6.Выполнить созданные проекты по шагам, с помощью отладчика, поставив точку останова после ввода данных

1.7.Доказать, что результат правильный.

2.Часть 2:

2.1.Выбрать вариант задания из таблицы 4.3-1 по усмотрению преподавателя.

2.2.Записать заданные или полученные в процессе формализации математические формулы в виде арифметических выражений.

2.3.Разработать алгоритм решения заданной задачи и представить его в виде схем алгоритмов. Страница 34

2.4.Создать проект, использующий модуль формы, процедуры пользователя,

решающие предписанные задачи, процедуры ввода исходных данных и процедуру вывода результата. Обмен данными между процедурами должен осуществляться через параметры, без использования глобальных переменных.

Событийная процедура должна содержать только операторы вызова пользовательских (общих) процедур.

2.5.Подготовить тесты для контрольного решения задачи.

2.6.Выполнить проект и получить результаты.

2.7.Доказать, что результат правильный.

4.3.3. Варианты задания

Варианты 1-й части задания для реализации процедуры вычисления арифметического выражения приведены в таблице 4.2-1.

Варианты 2-й части задания приведены в таблице 4.3-1.

Таблица 4.3-1

1)Определить периметры правильных n – угольников (10 – угольника, 50 –

угольника, 100 – угольника), вписанных в окружность заданного радиуса R. Назначение процедуры: Вычисление стороны правильного n-угольника

a = 2 R Sin

180

; вычисление периметра n- угольника

p = n a

 

n

 

 

2)Определить длины всех медиан треугольника, заданного длинами сторон a,b,c.

Назначение процедуры: Вычисление медианы, проведенной к стороне a: ma = 0.52b2 + 2c2 −a2.

3)Определить углы между тремя векторами, направленными из общей

начальной точки с координатами (0,0) в конечные точки: точку (2;5); точку

(7;6); точку (9;3).

Назначение процедуры: Вычисление угла между 2-мя векторами,

проведенными из

точки

(0, 0) в точки (x1, y1) и (x2, y2) по формуле

Cosα =

 

 

x1 x2

+ y1 y2

 

;

 

 

 

 

 

 

 

 

x 2 + y 2

 

 

x

2 + y 2

1

1

 

 

 

2

2

 

4)Вычислить и вывести площадь пятиугольника, заданного прямоугольными координатами своих вершин: A1(3;2), A2(9;6), A3(14;2), A4(10;-3), A5(7;-2)

Использовать формулу площади треугольника:

S = 21 (x2 − x1)(y3 − y1) −(x3 − x1)(y2 − y1)

Назначение процедуры: Вычисление площади треугольника по заданным координатам его вершин: (x1;y1), (x2;y2), (x3;y3)

5)Определить длины всех биссектрис треугольника, заданного длинами сторон a, b, c.

Назначение процедуры: Вычисление биссектрисы угла α

La = bc((b + c)2 −a2 ) . b + c

Тема4.3. ЛР«СтруктураVB-программ и процедуры»

Страница 35

6)Вычислить и вывести R - расстояние между двумя точками A и B, заданными

сферическими координатами. Соотношение между сферическими координатами и декартовыми

x= r sinθ cosφ;

y= r sinθ sinφ;

z= r cosθ;

0 ≤ r < ∞;−π < φ ≤ π;0 ≤ θ ≤ π;

R = (xB − xA )2 +(yB − yA )2 +(zB − zA )2

Назначение процедуры: Вычисление декартовых координат точки по заданным сферическим координатам

7)Вычислить значение площади полной поверхности треугольной пирамиды,

если известны длины всех ребер:

|AB| = 3; |AD| = 5; |DB| = 4; |DC| =

 

35

; |BC| =

19

; |AC| = 5.

 

Для

вычисления

площади

треугольника

 

использовать

формулу

Герона:S =

 

 

 

p = a +b +c , где a, b, c - длины сторон

p(p −a)(p −b)(p −c);

 

 

 

 

 

 

2

 

 

 

треугольника.

Назначение процедуры: Вычисление площади треугольника по формуле Герона

8)Определить высоту, на которой будет мяч, подброшенный вертикально вверх с

высоты y0=1м и начальной скоростью V0=20м/сек через время t=1сек, 3сек и 4сек Назначение процедуры: Вычисление высоты в момент

t: y(t) = y0 + v0 t −g t2 / 2 , где g = 9.8 м/сек

9)Определить площади правильных n - угольников (10-угольника; 50-угольника; 100-угольника), вписанных в окружность радиуса R

Назначение процедуры: Вычисление стороны правильного n-угольника

180o

 

180o

- радиус вписанной окружности;

 

 

 

 

 

a = 2RSin n ;где

r = RCos

n

 

площадь n-угольника S = 21 a ×n ×r.

10)Определить площадь кольца, внутренний радиус которого равен R1; а

внешний R2 (R2>R1).

Назначение процедуры: Вычислениеплощади круга радиуса R:S = πR2

11) Вычислитьи вывести полярные координаты 3-х точек, заданных

 

прямоугольными

координатами

в

 

правой

полуплоскости.

Формулы

 

преобразования координат:r =

 

 

φ

x

 

 

 

x2 + y2 ;

= arctg

y .

 

 

 

Назначение процедуры: Вычисление полярных координат по заданным

 

прямоугольным координатам точки правой полуплоскости

 

 

12)

Определить площадь каждого из 3-х секторов с радиусами R1, R2, R3 и с

 

центральными углами

βα

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Назначение процедуры: Площадь сектора радиуса R c

центральным углом

 

α(в градусах) равна S =πR 2

α.

 

 

 

 

 

 

 

 

 

360

 

 

 

 

 

Страница 36

Тема4.3. ЛР«СтруктураVB-программ и процедуры»

 

 

 

 

 

13)

 

Вычислить y = Sh( x)+ tg( x +1)- tg( 2 + Sh( x -1) )

 

 

 

2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Назначение процедуры: Вычисление Sh( x)=

x - -x

 

 

 

2

 

 

 

 

 

 

 

14)Определить стороны треугольника, заданного величинами своих углов и радиусом описанной окружности.

Назначение процедуры: Применить теорему синусов

αα тремяОпределить площадь каждого из 3-х кругов,15) ограниченных

 

окружностями, длины которых L1,L2,L3 известны.

 

 

 

Назначение процедуры: Вычислить площадь круга S =πR

2

предварительно

 

 

 

 

πR

 

 

 

 

 

вычислив R по формуле L = 2

 

 

 

 

16)

Определить углы треугольника, длины сторон которого a, b, c

заданы.

 

Назначение процедуры: Применить теорему половинного угла

 

tgγ=

 

 

, где p = a + b + c ,

угол, противолежащий стороне с

 

2

p ( p - c)

 

2

γ-

 

 

 

( p - a)( p - b)

 

 

 

 

 

17)

Вычислить y =

3x3 - 4x2 + 2 ;

z = 8x3 + 2x2 + x .

 

 

 

 

 

2x2 + 3x -1

x3 + 4x - 2

 

 

 

Назначение процедуры: Вычисление f(

a,b,c,d,x) = ax3 + bx2 + cx + d.

18)Определить общую длину дуги, образованной полуокружностями

 

3

2.5

1

 

2

 

 

19)

Назначение процедуры: Вычисление длины половины окружности L =πR

Вычислить стороны треугольника A и B при условии, что заданы сторона C и

 

углы треугольника αи β.

 

 

γα

 

 

 

Назначение процедуры: Вычисление стороны треугольника по формуле

 

Sin

 

 

 

A = C Sin ;γ= 180 -°

,где

α - угол, противолежащий стороне A, γ -

 

угол, противолежащий стороне C

 

20)Вычислить значения медиан треугольника, сторонами которого являются медианы исходного треугольника со сторонами a, b, c.

Назначение процедуры: Вычисление длины медианы, проведенной к стороне

 

 

a: ma = 0,5

2b2 + 2c2 - a2

 

 

 

 

 

 

 

 

21)

 

Вычислить y =

2.56x2 + 3.4x + 8.1

 

3x2 2

 

 

 

 

3.6x2 - 5.2

 

; z =

 

;

 

 

 

 

 

 

7x +

 

 

 

Назначение процедуры: Вычислениеf(a,b,c,x) = ax2 +bx +c

 

22)

 

Вычислить y = ch(

x + 2)- 3ch(

x)+ tg( 1- ch( 2x - 3) )

 

 

 

 

 

 

 

 

 

2

 

 

 

 

 

 

 

Назначение процедуры: Вычисление ch(

x)=

x + -x

 

 

 

2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Тема4.3. ЛР«СтруктураVB-программ и процедуры»

Страница 37

23) Определить длину дуги каждого из трех секторов с радиусами R1, R2, R3 и с центральными углами

πR

 

α

Назначение процедуры: Длина дуги сектора радиуса R c центральным углом

α(в градусах) равна L = 2

 

 

 

360

 

 

 

 

24)Вычислить координаты точки пересечения двух прямых:

a1x +b1y = c1

,

 

вычисляемые

по

формулам:x =

x

;y =

y

,

где

a2x +b2y = c2 ,

 

∆ =

 

a1

b1

 

;x =

 

c1

b1

 

;y =

 

a1

c1

 

.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

a2

b2

 

 

c2

b2

 

 

a2

c2

 

 

 

 

 

 

 

Назначение процедуры: Вычисление определителя второго порядка.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

25)

 

 

Вычислить y =

3.5x5 - 4x3 + 5x + 7

;

z =

1.8x3

+ 2x + 6

.

 

 

 

 

 

 

 

 

2x5 + 4.3x3 - 1

 

0.5x5

+ 4x3 - 2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Назначение процедуры: Вычисление f(

a,b,c,d, x)= ax5 + bx3 + cx + d

 

 

26)

 

 

Определить все углы треугольника при заданных значениях сторонa, b, c.

 

 

 

 

 

Назначение процедуры: Вычисление угла по теореме косинусов:

 

 

 

 

 

 

 

2

 

2

2

 

× b × c)

;

 

 

 

 

 

 

 

 

 

 

 

α= Arccos( b + c

 

a ) /( 2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

27)

 

 

 

 

 

 

b

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Вычислить определенный интегралy = f(x)dx для функцииf(x) = 2x +1

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

a

 

 

 

 

 

 

 

 

 

 

 

y

b - a

 

a + b

)+ f( b )].

 

 

 

 

 

 

 

 

 

 

 

 

 

 

6

f( a)+ 4f(

 

6

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

28)

 

 

Вычислить площадь трех круговS1, S2 и S3с заданными диаметрами d1, d2 и

 

 

 

 

 

 

 

 

d3.

 

 

 

 

 

 

 

 

 

 

π

 

 

 

 

 

 

 

 

 

Назначение процедуры: Вычисление S = × d2 /4

 

 

 

 

 

29)

 

 

Вычислить y =

3.5x3 - 2.8x2 + 6.7

;

 

z =

12.8x3 + 0.2x2 + 0.76 .

 

 

 

 

 

 

 

 

 

x3 + 0.3x2 - 1

 

 

 

 

5.5x3 + 0.4x2 - 2.8

 

 

 

 

 

Назначение процедуры: Вычисление f(

a,b,c, x)= ax3 + bx2 + c.

 

30)Определить общую площадь фигуры, образованной полукругами

3

2.5

1

 

2

 

 

 

2

Назначение процедуры: Вычисление площади полукруга S = πR .

 

 

2

31)Вычислить и вывести значения:g(1.2,s)+g(t,s)-g(2s-1,s+t), где s и t

действительные числа.

 

 

Назначение процедуры: Вычисление

g(

a,b)=

a2 + b2

 

 

a2 + 2ab + 3b2 + 4

 

 

 

32)

Вычислить y = 3.3x4 +8.5x + 7 и z =

 

4x +8

 

 

 

 

 

5x4 3x

 

 

 

2x 5

 

 

 

 

Назначение процедуры: Вычисление f(

a,b,c,x) = ax4 + bx + c.

 

 

 

 

 

 

 

 

 

 

Тема4.3. ЛР«СтруктураVB-программ и процедуры»

 

 

 

 

 

Страница 38

 

 

33)

 

 

 

 

 

 

 

 

sin

4π - 7sin

5π

 

 

 

 

y2 + sin

π

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Вычислить y =

 

 

 

3

2

;

z =

 

 

2

.

 

 

 

 

 

 

 

5sin 8π + sin

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

7π

 

 

 

1- y + sin

4π

 

 

 

 

 

 

 

 

 

 

 

 

 

5

3

 

 

 

 

 

5

 

 

 

 

 

 

 

Назначение процедуры: Вычисление f(

 

n, k)= sin π n .

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

k

 

 

34)

 

 

Вычислить y =

0.35x3 - 4.8x

;

 

z =

 

5.18x3 - 6.16

.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2x3 + 4.3x - 15

 

 

 

3.5x3 + 4.9x - 7.5

 

 

 

 

 

 

Назначение процедуры: Вычисление f(

 

a,b,c, x)= ax3 + bx + c.

 

35)

 

 

Вычислить

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

23x+2 + 34x

 

x

 

 

x+1

 

 

 

 

 

 

 

 

Y =

 

1 x

 

1 2x

;

z = sin

2

+(

 

x + 2)

;

 

 

 

 

 

 

 

 

 

 

 

+

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

 

3

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Назначение процедуры: Вычисление ax = exlna ,

a > 0

 

4.3.4. Содержание отчета

1.Тема и название работы.

2.Задания на разработку проектов и вариант задания.

3.Формализация и уточнение задания.

4.Разработка проектов:

4.2.Графические интерфейсы пользователя;

4.3.Таблицы свойств объектов;

4.4.Схемы алгоритмов процедур пользователя;

4.5.Программный код трех проектов с использованием процедур для первого части задания и программный код проекта для второй части задания.

5.Результаты выполнения проектов.

6.Доказательство правильности работы программы.

4.3.5. Пример выполнения первой части задания

1. Тема и название работы:

Структура VB-программ и процедуры. Средства программирования алгоритмов линейной структуры.

2. Задание на разработку проекта и вариант задания:

Создать приложение с именем Проект-4-3-Лаб для вычисления арифметических выражений:

z =

0.002 x y

 

; k = z; m = [z],

(100 y)(x +

2)

 

 

где x, y – исходные данные - вещественные (Double).

k, m, n, z, p– результаты вычислений, причем k, m, n - целые (Integer), z–вещественная (Double), p- вещественная (Single)..

Тема4.3. ЛР«СтруктураVB-программ и процедуры»

Страница 39

3. Формализация и уточнение задания:

Запись заданного арифметического выражения по правилам языка VB имеет вид:

z= (0.002 - Exp(x^ y)) / ((100 – y)*(x + 2))

Всоответствии с требованиями задания разобьем решение задачи на несколько отдельных задач и создадим три процедуры пользователя, вычисляющие заданное арифметическое выражения:

процедуру-функцию Function func(),с двумя формальными параметрами, необходимыми для вычисления выражения и передающимися по значению как входные аргументы;

процедуру-подпрограмму Sub proc( ), с тремя формальными параметрами, из которых два необходимы для вычисления выражения и передаются по значению как входные аргументы и один является результатом и передается по ссылке;

процедуру-подпрограмму Sub proc2( ) без параметров, в которой два необходимых для вычисления выражения аргумента и результат передаются через глобальные объекты.

4.Разработка приложения

4.1.Разработать графический интерфейс пользователя

Форма приложения может иметь такой же вид, как в предыдущей лабораторной работе, представленный на рис. 4.2-1.

4.2.Установка свойств объектов

Свойства всех объектов сведены в таблицу 4.2-2.

4.3.Разработка схемы алгоритма

Рис. 4.3-1

Рис. 4.3.2

Тема4.3. ЛР«СтруктураVB-программ и процедуры»

Страница 40

4.4.Написание программного кода с использованием процедур

Программный код первого проекта представлен на рис. 4.3-3.

Option Strict On

Option Explicit On

Imports System.Math

Public Class Form1

'Функция, вычисляющая выражение

Function func(ByVal x As Double, ByVal y As Double) As Double Dim z As Double 'локальный объект

z = (0.002 - Exp(x ^ y)) / ((100 - y) * (x + 2)) Return z 'возврат результата

End Function

'Процедура обработки события нажатия на кнопку Button1 Private Sub Button2_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) _

Handles Button2.Click

Dim x As Double, y As Double

Dim z As Double, p As Single, k As Integer

Dim m, n As Double

Dim s1, s2 As String

x = CDbl(TextBox1.Text)

y = CDbl(TextBox2.Text)

z = func(x, y) 'вызов функции и присвоение результата p = CSng(z)

k = CInt(z)

m = Fix(z)

n = Int(z)

s1 = CStr(z) : s2 = CStr(p) TextBox3.Text = CStr(z) TextBox4.Text = CStr(k) TextBox5.Text = CStr(m) TextBox6.Text = CStr(n) TextBox7.Text = CStr(p) TextBox8.Text = CStr(z + p) TextBox9.Text = s1 + s2

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) _ Handles Button1.Click

End End Sub End Class

Рис. 4.3-3.

Программный код второго проекта представлен на рис. 4.3-4.

Option Strict On

 

Option Explicit On

 

Imports System.Math

 

Public Class Form1

 

'Процедура, вычисляющая выражение

 

Sub proc(ByVal x As Double,ByVal y As Double,ByRef z As Double)

z = (0.002 - Exp(x ^ y)) / ((100 - y) * (x + 2))

 

End Sub

 

'Процедура обработки события нажатия на кнопку Button1

 

Private Sub Button2_Click(ByVal sender As System.Object, _

Тема4.3. ЛР«СтруктураVB-программ и процедуры»

Страница 41

Страница 42
End End Sub End Class

ByVal e As System.EventArgs) _

Handles Button2.Click

Dim x As Double, y As Double

Dim z As Double, p As Single, k As Integer

Dim m, n As Double

Dim s1, s2 As String

x = CDbl(TextBox1.Text)

y = CDbl(TextBox2.Text) proc(x, y, z) 'вызов прцедуры p = CSng(z)

k = CInt(z)

m = Fix(z)

n = Int(z)

s1 = CStr(z) : s2 = CStr(p) TextBox3.Text = CStr(z) TextBox4.Text = CStr(k) TextBox5.Text = CStr(m) TextBox6.Text = CStr(n) TextBox7.Text = CStr(p) TextBox8.Text = CStr(z + p) TextBox9.Text = s1 + s2

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) _

Handles Button1.Click

Рис. 4.3-4.

Программный код третьего проекта представлен на рис. 4.3-5.

Option Strict On

Option Explicit On

Imports System.Math

Public Class Form1

'Глобальные объекты

Dim x As Double, y As Double, z As Double

'Процедура, вычисляющая выражение

Sub proc2()

z = (0.002 - Exp(x ^ y)) / ((100 - y) * (x + 2)) End Sub

'Процедура обработки события нажатия на кнопку Button1 Private Sub Button2_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) _

Handles Button2.Click

Dim p As Single, k As Integer

Dim m, n As Double

Dim s1, s2 As String

x = CDbl(TextBox1.Text)

y = CDbl(TextBox2.Text) proc2(x, y, z) 'вызов прцедуры p = CSng(z)

k = CInt(z)

m = Fix(z)

n = Int(z)

s1 = CStr(z) : s2 = CStr(p)

TextBox3.Text = CStr(z)

TextBox4.Text = CStr(k)

Тема4.3. ЛР«СтруктураVB-программ и процедуры»

End End Sub End Class

TextBox5.Text = CStr(m)

TextBox6.Text = CStr(n)

TextBox7.Text = CStr(p)

TextBox8.Text = CStr(z + p)

TextBox9.Text = s1 + s2

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) _

Handles Button1.Click

Рис. 4.3-5.

5. Выполнение приложения и получение результатов

Результаты совпадают с результатами предыдущей лабораторной работы и приведены на рис. 4.2-11. При выполнении каждого из проектов не забудьте назначить его запускаемым проектом. Выполните первый проект по шагам с заходом в процедуруфункцию (клавиша F11), поставив точку останова после ввода исходных данных на операторе вызова функции. Обратите внимание на значения всех объектов в окнах Локальные и Видимые при заходе и выходе из процедуры-функции и возврате в точку вызова в событийной процедуре. Уберите из текста процедуры-функции оператор Return z и снова выполните проект по шагам, обоснуйте результат.

Аналогичным образом выполните по шагам с заходом в процедуру второй проект, обращая внимание на значения входных и выходных параметров в окне Локальные при заходе и выходе из процедуры. Измените в заголовке процедуры параметр по ссылке на

параметр по значению, вместо строки

Sub proc(ByVal x As Double, ByVal y As Double, ByRef z As Double)

должна быть строка

Sub proc(ByVal x As Double, ByVal y As Double, ByVal z As Double)

и снова выполните проект по шагам, обоснуйте результат.

Точно таким же образом изучите с помощью отладчика по шагам работу третьего

проекта. Далее измените его программный код, добавив строку

Dim x As Double, y As Double, z As Double

внутрь событийной процедуры:

Private Sub Button2_Click(ByVal sender As System.Object, _

ByVal e As System.EventArgs) _

Handles Button2.Click

Dim x As Double, y As Double, z As Double

End Sub

при этом оставив такую же строку с описанием глобальных объектов (в самом начале программного кода модуля формы, перед описаниями всех процедур).

Обоснуйте результат работы измененного программного кода, выполнив отладку проекта по шагам.

Снова измените программный код третьего проекта, убрав строку с описанием глобальных объектов (закомментируйте или удалите ее). Объясните возникшие ошибки.

6.Доказательство правильности результата

Результаты, полученные вручную, подтверждают правильность выполнения всех программ.

Тема4.3. ЛР«СтруктураVB-программ и процедуры»

Страница 43

Соседние файлы в папке ЛП-Раз-4-Инф-210700