Выведите ** экран в строку сумму всех четных чисел первой сотни. Помогите Visual Basic 6.0

0 голосов
50 просмотров

Выведите на экран в строку сумму всех четных чисел первой сотни. Помогите Visual Basic 6.0


Информатика (16 баллов) | 50 просмотров
Дан 1 ответ
0 голосов

А на экран это куда? на форму? в текстовое поле? MessageBox? я не совсем понял

вот код формы, результат пишется на ней же

Private Sub Form_Activate()
For i = 2 To 100 Step 2
summ = summ + i
Next i
Print summ
End Sub

(1.1k баллов)