Visual Basic - Problema con combos, ayuda porfa!

Life is soft - evento anual de software empresarial
 
Vista:

Problema con combos, ayuda porfa!

Publicado por Omar (56 intervenciones) el 07/11/2005 18:38:08
Que tal foro, pido de favor que me apoyen cn este asunto de los combos.
1.-Si el campo esta vacio me marca error (logico porque no encuentra datos), Como hago para evitar esto?
2.-Cuando tecleo no me detecta la primer pulsacion, sino hasta la segunda, es decir si la incidencia o dato que voy a ingresar es "Balastra" escribe solamente "alastra", tengo que teclear dos veces la primer letra.
Este es mi codigo:

Private Sub CBOTIPOREP_GotFocus()
Dim RsTipoRep As New ADODB.Recordset
Dim strTipoRep As String

strTipoRep = "SELECT Tipo_incidencia FROM Reportes"

Set RsTipoRep = Conn.Execute(strTipoRep)

With RsTipoRep
CBOTIPOREP.Clear
If RsTipoRep.RecordCount < 0 Then
RsTipoRep.MoveFirst
While Not RsTipoRep.EOF
CBOTIPOREP.AddItem RsTipoRep("Tipo_incidencia")
RsTipoRep.MoveNext
Wend
End If
End With

RsTipoRep.Close
Set RsTipoRep = Nothing

CBOTIPOREP.ListIndex = 0
SendKeys "%{DOWN}"
End Sub

De antemano les agradezco.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Problema con combos, ayuda porfa!

Publicado por ivan (463 intervenciones) el 07/11/2005 18:54:37
Para detectar lo del campo vacío usa la función ISNULL

Respecto a lo segundo, nunca me ha pasado, no entiendo parte de tu código, deberías probar con el depurador para que veas qué pasa cuando das un teclazo sobre el combo, para que veas porqué no te reconoce el primer caracter que pulsas.

Por cierto, para que sirve lo de ...... SendKeys "%{DOWN}" .....??
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema con combos, ayuda porfa!

Publicado por Omar (56 intervenciones) el 07/11/2005 19:03:28
Gracias por responder el sendkeys lo uso para al recibir el combo desplegarlo.

Oye como aplico (en que parte del cdigo eso del ISNULL? (sorry, apenas estoy aprendiendo)

gRACIAS.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema con combos, ayuda porfa!

Publicado por ivan (463 intervenciones) el 07/11/2005 19:15:36
Prueba con esto...:

if Not IsNull (RsTipoRep("Tipo_incidencia")) Then
CBOTIPOREP.AddItem RsTipoRep("Tipo_incidencia")
End If
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema con combos, ayuda porfa!

Publicado por Omar (56 intervenciones) el 07/11/2005 19:23:20
hey, millon de gracias, ya quedo esto.
Dices que no sabes porque me hace lo de la 1era duda? ok, deja veo haber que le encuentro, no creo que mucho, jejeje.
Tenia otras dudas con el funcionamiento de los combos, pero con esta le doy un adelanto a mi proyecto.

Nuevamente, gracias.

P.D. Te puedo incluir como contacto de msn?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema con combos, ayuda porfa!

Publicado por ivan (463 intervenciones) el 07/11/2005 19:30:13
Adelante....
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar