' Fecha de hoy
Dim fecha As DateTime = New DateTime(2009, 12, 20)
Dim month As Int32 = fecha.Month
Dim year As Int32 = fecha.Year
' Convertirmos a String el campo DateTime para poder utilizar
' una comparaci�n Like.
'
Dim filtro As String = _
"Convert(Fecha, 'System.String') Like '*/" & month & "/" & year &
"*'"
BindingSource1.Filter = filtro
F�jate en el asterisco * final. Es necesario porque normalmente los campos
DateTime est�n formados por la fecha y la hora, y el asterisco representar�
las horas.
Un saludo y �Feliz Navidad!
--
Enrique Mart�nez
[MS MVP - VB]
Nota informativa: La informaci�n contenida en este mensaje, as� como el
c�digo fuente incluido en el mismo, se proporciona �COMO EST��, sin
garant�as de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en pr�ctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.