VPF::Проблема с циклом и двумя формами

fri

Дата 28.12.2008, 12:55 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 28.12.2008

Репутация: нет
Всего: нет

Суть проблемы такова:нужно что б во 2-й форме вывело все 20 значений m, а выводит только при n=1

Код


Private Sub Command1_Click()
For n = 1 To 20
m = (21.3 + n * 10) / (2 * n + 1)
Next n
Unload Form1
Load Form2
Form2.Show 1
End Sub

Private Sub Form_Load()
Text1.Text = Text1.Text + "m=" + Str(m)
End Sub

fri

Дата 28.12.2008, 13:45 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 28.12.2008

Репутация: нет
Всего: нет

Понял в чем проблема, проблема в модуле ,а вот какой модуль может сохранить все значения m ,а не только последние???

Naghual

Дата 28.12.2008, 17:01 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1893
Регистрация: 15.5.2004
Где: Украина, Днепр

Репутация: 26
Всего: 49

Проблема не в модуле. Проблема в непонимании.
Вы с массивом чисел должны работать а не с единичной переменной.

--------------------

Я желаю всем Счастья!

Akina

Дата 28.12.2008, 21:04 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454

Цитата(fri @ 28.12.2008, 14:45

)

какой модуль может сохранить все значения m ,а не только последние???

Common module. Но в первую очередь читаем, что говорит Naghual.

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

I_Am_Rock

Дата 29.12.2008, 00:15 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 523
Регистрация: 18.1.2008

Репутация: 12
Всего: 15

Цитата(fri @ 28.12.2008, 12:55

)

а выводит только при n=1

Хмм... странно. Мне почему-то кажется, что в Вашем коде должно выводиться только при n=20

Цитата

все 20 значений m

Вот вы подумайте - как у одной переменной m может быть 20 значений?.. А вот если вы сделаете m(1), m(2)... smile

Я просто боюсь, что господин fri иначе не поймет, что имел в виду господин Naghual. smile

Это сообщение отредактировал(а) I_Am_Rock - 29.12.2008, 00:21

Данкинг

Дата 29.12.2008, 00:21 (ссылка)

(нет голосов)

Загрузка ...

Yersinia pestis

Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: нет
Всего: 130

Цитата(fri @ 28.12.2008, 13:45

)

Понял в чем проблема,

В том, что на выходе из цикла ты получаешь одно-единственное значение M, которое, по идее, действительно должно равняться тому, что будет по формуле при N=20.

--------------------

There's nothing left but silent epitaphs.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »