Tipo de dato de tipo fecha que si admite el valor NULL

Dim vFecha As Nullable(Of DateTime) = Nothing

Función FORMAT:

textBox1.Text = FORMAT(fila.item("fecha"),"dd/MM/yyyy")
textBox1.Text = FORMAT(valor, "##,##0.00") '1.500,43
textBox1.Text = FORMAT(valor, "##,##") '1.500
textBox1.Text = FORMAT(valor, "##0.00") '1500,43

Ejemplo de Fecha Larga:

Imports System.Globalization
dim d as Date
Public G_Fecha_larga As String = d.ToString("dd \de MMMM \de yyyy", CultureInfo.CreateSpecificCulture("es-ES"))

Ejemplos de Formato de Fechas

textBox1.Text = Datetime.Now().ToShortDateString() ' "2009/06/16" 
textBox1.Text = Datetime.Now().ToShortTimeString() ' "09:50:00 am" 
DEPENDE DE LA CONFIGURACIÓN DE CADA EQUIPO:
textBox1.Text = DateTime.Now() ' "2009-06-16 09:50:20.000 am"  


De esta otra forma podemos establecer la configuración deseada
Dim time As DateTime = DateTime.Now
Dim format As String = "yyyy-MM-dd HH:mm:ss"
Dim formatofechas As String = time.ToString(format)  

Por último Fechas:

(1 del mes anterior)
Dim uno As Date = DateSerial(Year(fechaActual), Month(fechaActual) - 1, 1)

(ultimo del mes anterior)
Dim ultimo as Date = DateSerial(Year(fechaActual), Month(fechaActual), 0)

(Ayer)
Dim yesterday As DateTime = DateTime.Today.AddDays(-1)
Print Friendly, PDF & Email