Ayuda con dos Combos
Publicado por Juan (1 intervención) el 18/02/2003 21:31:11
Tengo 2 combos y 1commando Aceptar (combo1=Dias),(combo2=Mes).Al introducir una fecha y pulsar Aceptar quiero que se abra un formulario para esa fecha llamado form1 y al introducir otra fecha otro formulario.Cada form va cada 5 dias (01al05 de Enero) Form1, (06al10)Form2 y asi consecutivamente.Este es el codigo del comando Aceptar. Gracias
Private Sub Aceptar_Click()
Dim Dia As String, Mes As String
Dia = Combo2
Mes = Combo1
Select Case Dia
Case "01,02,03,04,05"
If Mes = "Enero" Then
End If
Case Else
End Select
End Sub
Private Sub Aceptar_Click()
Dim Dia As String, Mes As String
Dia = Combo2
Mes = Combo1
Select Case Dia
Case "01,02,03,04,05"
If Mes = "Enero" Then
End If
Case Else
End Select
End Sub
Valora esta pregunta


0