validar formato hora

Dim time As DateTime
        Dim valid As Boolean = DateTime.TryParseExact("00:05:00", "hh:mm:ss", CultureInfo.InvariantCulture, Globalization.DateTimeStyles.None, time)


fuente

mes en palabras

dtp_fecha_ValueChanged(Me, EventArgs.Empty)

Public Function get_fecha() As String
        Return dtp_fecha.Value.ToString("dd-") & New CultureInfo("es-ES", False).DateTimeFormat.GetMonthName(dtp_fecha.Value.ToString("MM")) & dtp_fecha.Value.ToString("-yyyy")
    End Function

salida = 10-octubre-2019


fuente

Estandarizar fecha para distintos lenguages y sistemas operativos

Dim ci As CultureInfo = CultureInfo.CreateSpecificCulture(CultureInfo.CurrentCulture.Name)
ci.DateTimeFormat.ShortDatePattern = "dd-MM-yyyy" System.Threading.Thread.CurrentThread.CurrentCulture = ci



fuente

Obtener día de la semana en palabras

Imports System.Globalization

Public Function getDayWord()
        Dim culture As New CultureInfo("es-CL")
        Dim diaSemana As String = culture.DateTimeFormat.GetDayName(DateTime.Today.DayOfWeek)
        diaSemana = Char.ToUpper(diaSemana(0)) & diaSemana.Substring(1)
        Return diaSemana
    End Function

Obtener el mes en palabras ingresando el número de mes

Dim mes As String = New CultureInfo("es-ES", False).DateTimeFormat.GetMonthName(1)

Obtener el separador decimal

Dim p As String = CultureInfo.CurrentCulture.NumberFormat.NumberDecimalSeparator