Ver Mensaje Individual
  #5 (permalink)  
Antiguo 04/01/2010, 09:47
JonaRock
 
Fecha de Ingreso: diciembre-2009
Mensajes: 23
Antigüedad: 14 años, 4 meses
Puntos: 0
Respuesta: Problema MonthName(Month(Date())-1)

Disculpa, esta es la respuesta correcta =)

Dim nombremesanterior As String = ""
If (Date.Now.Month = 1) Then
nombremesanterior = MonthName(Date.Now.Month)
TextBox1.Text = nombremesanterior
Else
nombremesanterior = MonthName(Date.Now.Month - 1)
TextBox1.Text = nombremesanterior
End If