| Вопрос: Показать все результаты | Добавлено: 08.02.06 19:04 |
Автор вопроса:  СЕРЕЖЕНЬКА
|
|
Проблема в том, что этот код показывает результат лишь для х=5, а мне нужно в текстбоксе было показано резульаты для всех х (в колонку)
Private Sub Command1_Click() Dim x, n, S For x = 1 To 5 For n = 0 To 11 S = x ^ n + S Next n Next x Text1 = Text1 & S & vbNewLine End Sub |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  HOOLIGAN Вопросов: 0 Ответов: 1066 |
Профиль | | #1 | Добавлено: 08.02.06 19:55 |
| Вставь внутрь цикла | ||
|
Номер ответа: 2 Автор ответа: [root]Вопросов: 45 Ответов: 1212 |
Web-сайт: Профиль | | #2 | Добавлено: 13.02.06 19:44 |
|
Option Explicit
Private Sub Command1_Click() Dim x, n, S For x = 1 To 5 For n = 0 To 11 S = x ^ n + S Next n Text1 = Text1 & S & vbNewLine Next x End Sub |
||
Страница: 1 |