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)