Трусов М. А. Visual Basic .NET. Создание графических объектов и основы программирования стр.15
Трусов М. А. Visual Basic .NET. Создание графических объектов и основы программирования стр.15

If i = True Then

Do

a = a + 0.0001 Labell.Left = a Applicat ion.DoEvent s() Loop While i = True End If End Sub

Private Sub Button2_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button2.Click i = False End Sub End Class

При работе с графикой имеет смысл применять подобные циклические программы , если есть возможность определить условие выхода из цикла с помощью оператора Exit Do или Exit For. Помните, что чем проще программа, тем она надежнее. Такую программу легче редактировать, в ней легче искать ошибки. А теперь посмотрим, как выглядит циклическая программа с использованием таймера. Расположим на форме таймер Timer, две кнопки Button и текстовое поле TextBox. Кнопки используются для включения и выключения таймера, а в текстовом поле указывается величина статической переменной, которая будет увеличиваться на единицу с каждым включением таймера. Статическая переменная объявляется с помощью ключевого слова Static. Она отличается от обычной переменной тем, что сохраняет свое значение после каждого вызова процедуры. Вот как выглядит код данной программы:

Трусов М. А. Visual Basic .NET. Создание графических объектов и основы программирования

Математические вычисления

Private Sub Buttonl_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Buttonl.Click Timerl.Start() End Sub

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

ByVal e As System.EventArgs) Handles Timerl.Tick

Static a As Integer

a = a + 1

TextBoxl.Text = a

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button2.Click Timerl.Stop() End Sub

Подобная программа очень проста. Ее выполнение легко остановить выключением таймера, для чего можно использовать кнопку Button или условный оператор If...Then, определив при этом условие выхода из цикла.

1.6. Математические вычисления

Коды арифметических выражений

Математические операторы в Visual Basic .NET имеют привычный для нас вид. Их перечисление в порядке приоритета приводится в табл. 1.4.

Таблица 1.4 т Математические операторы

Знак

Действие

 

Возведение в степень

-

Смена знака числа

*, /

Умножение и деление

\

Целочисленное деление

Mod

Нахождение модуля

+ ( -

Сложение и вычитание

&

Конкатенация (объединение двух строк в одну)

Трусов М. А. Visual Basic .NET. Создание графических объектов и основы программирования

ГЛАВА 1 ▼ Программирование на Visual Basic .WET


⇐ Предыдущая Следующая ⇒
 
 
 
Powered by Exponenta