Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: час
i = 1 .MoveLast .MoveFirst Do While Not .EOF 'конец будет loop Me("Надпись" & i).Caption = !Поле2 'присваиваем i-ой надписи значение поля2 .MoveNext i=i+1 Loop End If End With
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.