Версия для печати темы

Автор: margo2009 21.12.2009, 18:10

Условие задачи:
Вывести на экран значения функции y=x^2 при изменении х от 2 до 12 с шагом 2.

Решение:

Option Compare Database
Option Explicit
Private Sub Кнопка2_Click()
Dim x As Integer, у As Single
For x = 2 To 12 Step 2
y = x ^ 2
Поле9 = y
Next x
End Sub

Проблема в том, что ответ показывается только один (144), т.е. последний. Я понимаю, что все последующие ответы "перекрывают" предыдущие, т.к. в созданной мной форме для ответа выделено только одно поле (Поле9).
Но по условию задачи нужно вывести на экран значениЯ (и в данном случае их будет 6).
Подскажите, пожалуйста, КАК это сделать?
Может можно как-то написать программу, чтобы они через запятую выводились...
Или выводилось - при х таком-то то, у такой-то...

Заранее спасибо

Автор: julia_lisha 5.2.2010, 14:12