powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Изменение даты текстбокса по спину
6 сообщений из 6, страница 1 из 1
Изменение даты текстбокса по спину
    #35111740
dd44
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Уважаемые знатоки,
Есть текстбокс с сегодняшней датой, рядом спинбаттон.
Нужно, чтобы по нажатю на спин менялась дата текстбокса на +/-1 день.

Проблема номер два:
Как запретить ручной ввод данных в текстбокс.

Заранее благодарю.
...
Рейтинг: 0 / 0
Изменение даты текстбокса по спину
    #35111763
Фотография Worobjoff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Почему бы DTPicker не использовать?
...
Рейтинг: 0 / 0
Изменение даты текстбокса по спину
    #35111765
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Уважаемые знатоки,
> Есть текстбокс с сегодняшней датой, рядом спинбаттон.
> Нужно, чтобы по нажатю на спин менялась дата текстбокса на +/-1 день.
>
> Проблема номер два:
> Как запретить ручной ввод данных в текстбокс.

Уважаемый телезритель
на первый вопрос поиграйся в Immediate ? now +1

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Изменение даты текстбокса по спину
    #35111767
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Уважаемые знатоки,
> Есть текстбокс с сегодняшней датой, рядом спинбаттон.
> Нужно, чтобы по нажатю на спин менялась дата текстбокса на +/-1 день.
>
> Проблема номер два:
> Как запретить ручной ввод данных в текстбокс.

Достала эта клавиатура :(

а со вторым пунктом свойство Enabled можно поизучать

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Изменение даты текстбокса по спину
    #35111786
dd44
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ТелезителЯ благодарят знатаков,
пошел изучать матчасть :))
...
Рейтинг: 0 / 0
Изменение даты текстбокса по спину
    #35114593
Шыфл
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
Private Sub SpinButton1_SpinDown()
Dim x As Date
x = CDate(Me.DateBox_start.Value)
x = x -  1 
Me.DateBox_start.Locked = False
Me.DateBox_start.Value = Day(x) & "/" & Month(x) & "/" & Year(x)
Me.DateBox_start.Locked = True
End Sub

Private Sub SpinButton1_SpinUp()
Dim x As Date
x = CDate(Me.DateBox_start.Value)
x = x +  1 
Me.DateBox_start.Locked = False
DateBox_start.Value = Day(x) & "/" & Month(x) & "/" & Year(x)
Me.DateBox_start.Locked = True
End Sub
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Изменение даты текстбокса по спину
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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