В TextBox нужно записывать дату и время, но как это сделать проще

@Vovan303 · Регистрация: 17.06.2011

Студворк — интернет-сервис помощи студентам

Добрые люди, решился взяться за старый добрый vb 6.0 , но возникла вот такая проблемка с записью даты и время в textbox:

Суть в том что в textbox нужно записывать дату и время, но как это сделать проще?
Хочу что бы время записывалось так:
часы : минуты : секунды , а дата в свою очередь также только через точку. Но ручками постоянно выставлять двоеточие не особо хочется. Как объяснить этому бейсику что после написания двух знаков нужно ставить двоеточие(точку).

или может есть какое-то альтернативное решение

помогите плз!

@gaw · 19.12.2011, 01:26

Visual Basic
1
Text1.Text = Format(Now, "Hh:Nn:Ss") & "  " & Format(Now, "dd.mm.yyyy")

@Vovan303 · 19.12.2011, 01:34 **[ТС]**

Сообщение от gaw

Visual Basic
1
Text1.Text = Format(Now, "Hh:Nn:Ss") & "  " & Format(Now, "dd.mm.yyyy")

Это понятное дело. Как примотать эту процедуру к textbox, что бы я вводи допустим время, а он мне отделял по 2 знака двоеточиями

@gaw · 19.12.2011, 01:41

Like ""

@Alex77755 · 19.12.2011, 01:57

без проверки, что не введён бред - просто двоеточия после 2 и 5 символов

Visual Basic
1
2
3
Private Sub Текст1_Change()
If Len(Текст1.Text) = 2 Or Len(Текст1.Text) = 5 Then Текст1.Text = Текст1.Text & ":": Текст1.SelStart = Len(Текст1.Text)
End Sub

@gaw · 19.12.2011, 02:03

если текстбокс для одной записи времени

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Private Sub Text1_Change()
Dim t
t = Text1.Text
If Text1.Text Like "######" Then
t = Mid(t, 1, 2) & ":" & Mid(t, 3, 2) & ":" & Mid(t, 5, 2)
Text2 = t
If 23 - Val(Mid(t, 1, 2)) >= 0 And 59 - Val(Mid(t, 4, 2)) >= 0 And 59 - Val(Mid(t, 7, 2)) >= 0 Then
Text1.Text = t
End If
End If
End Sub

@Vovan303 · 19.12.2011, 02:07 **[ТС]**

Всем спасибо)

Новые блоги и статьи Все статьи Все блоги /
Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .	Использование значений реквизитов справочника в документе, с определенными условиями и правами Maks 07.04.2026 1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .

@Vovan303 0 / 0 / 0 Регистрация: 17.06.2011 Сообщений: 59

	В TextBox нужно записывать дату и время, но как это сделать проще 19.12.2011, 01:07. Показов 4256. Ответов 6 Метки нет (Все метки) Добрые люди, решился взяться за старый добрый vb 6.0 , но возникла вот такая проблемка с записью даты и время в textbox: Суть в том что в textbox нужно записывать дату и время, но как это сделать проще? Хочу что бы время записывалось так: часы : минуты : секунды , а дата в свою очередь также только через точку. Но ручками постоянно выставлять двоеточие не особо хочется. Как объяснить этому бейсику что после написания двух знаков нужно ставить двоеточие(точку). или может есть какое-то альтернативное решение помогите плз! 0

@gaw 6644 / 1511 / 169 Регистрация: 09.01.2010 Сообщений: 4,298
	19.12.2011, 01:41
	Like "" 0

@Vovan303 0 / 0 / 0 Регистрация: 17.06.2011 Сообщений: 59
	19.12.2011, 02:07 [ТС]
	Всем спасибо) 0