Форма та же.

Код:

Dim a As Integer (Объявлен в разделе General)

Private Sub Command1_Click()

a = 123

Text1.Text = a

End Sub

Private Sub Command2_Click()

Text2.Text = a

End Sub

Теперь при нажатии на второй кнопке в окне 2 тоже появится 123

Пример 3:

Добавьте вторую форму в проект и измените где нужно код.

Код:

Public a As Integer

Private Sub Command1_Click()

a = 123

Form2.Show

End Sub

Private Sub Command2_Click()

Text2.Text = a

End Sub

Форма 2

Код

Private Sub Form_Load()

Text1.Text = Form1.a

End Sub

При загрузке второй формы в текстовом поле появится 123, так как в коде есть ссылка на переменную из первой формы, и в первой форме переменная «а» объявлена как Public. Это два необходимых условия для передачи переменных между формами.

МАТЕМАТИЧЕСКИЕ ОПЕРАТОРЫ

Сложение +

Вычитание -

Умножение *

Деление /

Деление нацело \

Деление по модулю (вычисление остатка) mod

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

ОПЕРАТОРЫ СРАВНЕНИЯ

Меньше <

Больше >

Равно =

Меньше или равно < =

Больше или равно > =

Не равно < >