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