powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Формат ввода в форму
5 сообщений из 5, страница 1 из 1
Формат ввода в форму
    #36110489
Nik_Koraman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всем доброго времени суток. нужен help. сделана своя форма для заполнения таблицы. в одной из ячеек должна стоять дата

Private Sub TextBox2_Change()
TextBox2 = Date

таким образом он сам выводит сегодняшнюю дату в данный textbox, но её нельзя исправлять. подскажите плиз как сделать так чтобы при вызове формы дата ставилась автоматам как сейчас но её в случае необходимости можно было исправить.
заранее спасибо
...
Рейтинг: 0 / 0
Формат ввода в форму
    #36110882
olga zobkov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Nik_Koraman,

TextBox2 = Date
добавь в событие вызова формы
...
Рейтинг: 0 / 0
Формат ввода в форму
    #36111003
Nik_Koraman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
всё равно не хочет менять руками
...
Рейтинг: 0 / 0
Формат ввода в форму
    #36111682
Фотография gjghjc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Правильно не хочет. Как только ты меняешь в своем текстбоксе значение срабатывает событие Change и у тебя снова в Text2 сегодняшняя дата.

Чтобы можно было менять тебе уже сказали помести в Form_Load

Код: plaintext
TextBox2.Text = CStr(Date)

А из события

TextBox2_Change Удали

Код: plaintext
TextBox2 = Date


С уважением, Николай.
...
Рейтинг: 0 / 0
Формат ввода в форму
    #36114801
Nik_Koraman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
большое спасибо, всё заработало!=)
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Формат ввода в форму
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]