Написал Diman 11/12/00 - 20:46:23
IP: 195.161.156.14 Браузер: Mozilla/4.7 [ru] (Win98; I)

Сообщение

Private Sub c1_Click() If t2.Text = "1" Then For a = 1 To 10 If t1.Text = "" Then t1.Text = 2 Else t1.Text = t1.Text + 2 End If Next Else t2.Text = "133" t1.Text = "216" End If l1.Caption = "210" l2.Caption = "300" l1.Caption = l1.Caption + 20 l2.Caption = l2.Caption + 15 t1.Text = t2.Text & l1.Caption t2.Text = l1.Caption - 2 End Sub

Читать далее

и что? нужно написать результат?ё - dennis, 11/13/00 - 18:53:10

Ответить на это сообщение

Главная страница