Хранение информации в переменных

     Для использования переменной необходимо выполнить три действия: 

   Объявить переменную. Сообщить программе имя и тип переменной, которую требуется использовать.

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

Непосредственно использовать переменную. Извлечь значение, содержащееся в переменной, и использовать его в программе.

Усвоение материала - разработка проектов.

Программный код:

Private Sub Button1_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Button1.Click

Text1.Focus()
          Dim mat,  fiz, inf As Integer

Dim fizk As Integer

Dim z As Single

fiz = Val(Text1.Text)
mat = Val(Text2.Text)
inf = Val(Text3.Text)
fizk = Val(Text4.Text)
z = (fiz + mat + inf + fizk) / 4
Text5.Text = Str(z)
End Sub

 Private Sub Button2_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Button2.Click
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text1.Focus()
End Sub

 Private Sub Button3_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Button3.Click
End
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Text1.Focus()
End Sub