publicado el 22 de junio13 años Buenas tardes, necesito limpiar los registros de mis comboboxt de mi formulario, tambien quisiera que me ayudes en validar antes de agregar el nuevo registro, por ejemplo que me salga un mensaje para confirmar la grabación. porque en mi combobox pongo nombre_combo.value ="" nombre_combo.clear Y no me sale.. ayuda ..!!! Nuevo.rar
publicado el 23 de junio13 años Combo.Text = "" 'Borra el texto del combo Combo.Clear 'Deja el combo sin elementos 'Mensaje para confirmar o cancelar una acción x = MsgBox("Confirmar grabación", vbYesNo + vbQuestion, "Grabar registro") If x = vbYes Then 'Ha contestado SI Else 'Ha contestado NO End If [/CODE]
publicado el 23 de junio13 años Autor Me sale un error..por esto mira [FONT=Verdana]Private Sub cb_motivo_llamada_Change()[/FONT][FONT=Verdana][/FONT] [FONT=Verdana]If Me.cb_motivo_llamada.List(Me.cb_motivo_llamada.ListIndex, 0) = "8" Then[/FONT] [FONT=Verdana]Me.txt_otro.Visible = True[/FONT] [FONT=Verdana]Else[/FONT] [FONT=Verdana]Me.txt_otro.Visible = False[/FONT] [FONT=Verdana]End If[/FONT] [FONT=Verdana][/FONT][FONT=Verdana]End Sub [/FONT][/CODE] [left][color=#333333]Me.cb_motivo_llamada.List(Me.cb_motivo_llamada.ListIndex, 0) Cuando pongo : [/color][color=#333333] cb_motivo_llamada.text = "" [/color][color=#333333]cb_motivo_llamada.clear Igual me me vota un error, porque recibe el valor "-1" y x eso me sale un error ahi.. ayudame , si miras lo que te eh enviado y pones eso y lo ejecutas vas a ver del error que te digo.. x favor ayudame me falta eso.. [/color] [/left]
publicado el 24 de junio13 años Hola Utiliza el evento Click en lugar del evento Change. El evento Click solo se ejecutá cuando seleccionas un elemento del combo o cambias manualmente la propiedadd .ListIndex. El evento Change se ejecuta cuando se produce cualquier cambio en el combo, sea del tipo que sea. Cuando borras la propiedad .Text, se pone a -1 el valor de la propiedad .Listindex, y se ejecuta el evento Change, pero no se ejecuta el evento .Click. Espero que hayas entendido el mecanismo. Saludos
publicado el 24 de junio13 años Autor Pero igual cambio al vento clic pero igual no puedo limipar... no me sale.. Quisiera limpiar para despues volver a seleccionar otro. le pongo combo.text = "" ... mandame un ejemplo... pues para poder saber hacerlo... Un favor date cuenta que yo mis combos los lleno desde una tabla ya que yo cuando un CODIGO y una DESCRIPCION un ejemplo porfavor
publicado el 24 de junio13 años A ver: Para borrar un combo cargado con la propiedad .RowSource, hay que borrar dicha propiedad: cb_motivo_llamada.RowSource = ""[/CODE] Para borrar el texto del combo: [CODE]cb_motivo_llamada.Text = "" 'También valdría cb_motivo_llamada.ListIndex = -1 [/CODE] En cualquier caso debes cambiar el evento [b]Change [/b]por el evento [b]Click, [/b]de lo contrario te dará error[b]. [/b] [CODE]Private Sub cb_motivo_llamada_Click() If Me.cb_motivo_llamada.List(Me.cb_motivo_llamada.ListIndex, 0) = "8" Then Me.txt_otro.Visible = True Else Me.txt_otro.Visible = False End If End Sub[/CODE] Saludos
Buenas tardes, necesito limpiar los registros de mis comboboxt de mi formulario, tambien quisiera que me ayudes en validar antes de agregar el nuevo registro, por ejemplo que me salga un mensaje para confirmar la grabación.
porque en mi combobox pongo
nombre_combo.value =""
nombre_combo.clear
Y no me sale.. ayuda ..!!!
Nuevo.rar