![Antiguo](http://static.forosdelweb.com/fdwtheme/images/statusicon/post_old.gif)
04/01/2010, 09:47
|
| | Fecha de Ingreso: diciembre-2009
Mensajes: 23
Antigüedad: 15 años, 1 mes 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 |