сумиране на Text1.Text
Private Sub CommandButton1_Click()
Dim a As Single
Dim b As Single
Dim c As Single
Dim d As Single
a = CStr(text1.Text)
b = CStr(text3.Text)
c = CStr(text5.Text)
Label17.Caption = d
Label17.Caption = a + b + c
End Sub
защо ми дава грешка ?
