Autor Tema: Control Monthcalendar1 (Leído 1436 veces)

Vortice · « **en:** Viernes 11 de Abril de 2008, 18:52 »

Camaradas espero y estén bien….

Ustedes saben como usar el control o herramienta

Q es un calendario desplegable, mi consulta es:

Al dar doble clic o un clic como sea, en un día de un mes de un año especifico, esa fecha se traspase a una caja de texto, es esto posible…

Ojala si, me solucionaría muchas quebraduras de cabeza, de antemano gracias camaradas….

Vortice · « **Respuesta #1 en:** Lunes 14 de Abril de 2008, 21:26 »

Solucionado....

'============ Calendario ===========
Private Sub MonthCalendar1_DateChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.DateRangeEventArgs) Handles MonthCalendar1.DateChanged
fecha_cotiz.Text = MonthCalendar1.SelectionRange.Start
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
MonthCalendar1.Visible = True
End Sub
Private Sub MonthCalendar1_LostFocus(ByVal sender As Object, ByVal e As System.EventArgs) Handles MonthCalendar1.LostFocus
If GetAsyncKeyState(9) = -32767 Then
MonthCalendar1.Visible = False
Empresa.Visible = False
Button1.Focus()
End If
End Sub

SoloCodigo

Autor Tema: Control Monthcalendar1 (Leído 1436 veces)

Vortice

Control Monthcalendar1

Vortice

Re: Control Monthcalendar1