VB.net - Урок 4 - Время и даты

Для получения точного времени используем - Now.ToLongTimeString,

а для получения даты - Now.ToLongDateString.

Вариант создания календаря и часов, на форму помещаем 2 ярлыка и таймер (interval 1000 = 1 сек)

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        'время
        lblVrem.Text = Now.ToLongTimeString
        'полная дата
        lblData.Text = Now.ToLongDateString
    End Sub

Для гибкой системы управления датами и временем используем спец символы:

Dim D As Date = Now
Format(D,"Сегодня dd число, год yyyy, день недели - dddd, а месяц -  MMMM")

РЕЗУЛЬТАТ:
Сегодня 12 число, год 2015, день недели - четверг, а месяц -  Ноябрь

Таблица символов отображения времени

 fff-  милисекунды -  980

 %s -  секунды без нуля -  45

 ss -  секунды -  45

 %m -  минуты  без нуля -  46

 mm -  минуты -  46

 %h -  часы  без нуля -  2

 hh -  часы 12-  02

 HH -  часы 24 -  14

 ddd-  дни недели сокр -  Чт

 dddd-  дни недели -  четверг

 MM -  месяц -  11

 MMM -  месяц - ноя

 MMMM -  месяц - Ноябрь

 %y -  год - посл цифры -  15

 yy -  год - 2 посл цифры - 15

 yyyy-  год полный - 2015

Смотреть видео

END