Visual Basic - no puedo , no puedo

Life is soft - evento anual de software empresarial
 
Vista:

no puedo , no puedo

Publicado por mortadelo (29 intervenciones) el 31/01/2002 21:02:41
bueno salu2 antes de nada , vamos a ver , lo que quiero es guardar en una variable , el texto de un combo para que cuando le de al commandbuttom se me abra un formulario( frmparte ) u otro ( frmciaservicio ), creo que el codigo esta bien pero este no rula , se que en borlan esta operacion va perfectamente pero aqui en visual no ,
¿Como lo podria hacer ? gracias y un saludo nuevamente.

Este es el codigo que tengo.

Option Explicit
Dim Operacion As String
Dim operAcionb As Variant

Private Sub Command1_Click()

If Operacion = "Nº_Parte" Then
frmparte.show
else
frmciaservicios.show
End If

End Sub

Private Sub Form_Load()
Operacion = Me.Combo1.Text
End Sub
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:no puedo , no puedo

Publicado por PonchoWare (88 intervenciones) el 31/01/2002 21:38:52
Pues todo parece estar bien, pero no se que sea lo que no te funciona,
Intenta cambiar lo que tienes en el Form_Load al Combo1_Click.
O especifica que no funciona.

En realidad no necesitas la variable, y si en Style del Combobox tienes Dropdown List (o sea que no se pueda escribir en el combo, solo seleccionar), es mejor utilizar el indice, quedaria mas o menos asi:

Private Sub Command1_Click()

if Combo1.ListIndex=0 then 'si es el primer elemento
frmparte.show
else
frmciaservicios.show
End If

End Sub

Private Sub Form_Load()
Combo1.ListIndex=0 'selecciona el primer elemento
End Sub

Saludos
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:no puedo , no puedo

Publicado por Fran (114 intervenciones) el 31/01/2002 21:48:28
Si el name que le dás al Combo es
ME.COMBO1
me parece que el nombre que das al combo1 no es correcto.

¿?

Saludos.
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