Cambiar origen de control de cuadro de texto al cambiar de campo
En un subformulario tengo varios campos con cuadro combinado y no se como lograr que ha medida que paso por esos campos con cuadro combinado vaya mostrando en un cuadro de texto ubicado al final del formulario principal las column(0) o Column(1) o Column(2) de esos cuadros combinados
2 respuestas
Luis: Te respondo sin acabar de entender tu pregunta, pero si quieres mostrar en un Cuadro de Texto que se llame Txt01 el valor de la primera columna del Combo CbN01, en el Evento GotFocus del Combo.
Private Sub CboN01_GotFocus() If IsNull(Me.CboN01) Then MsgBox "No vamos a pasar ningún valor a Txt01",vbCritical,"FALTA DATO" Else Me.Txt01 = Me.CboN01.Column(0) End If End Sub
O lo pones en el AfterUpdate. Saludos >> Jacinto
No dices si es simplemente al poner el cursor o al elegir o escribir algún valor. Primero vamos a suponer que es al poner el cursor. En el evento al recibir el enfoque puedes poner
If not isnull([nombredelcombinado])
Texto7=me.nombredelcombinado.column(0)
end if
En caso de que la columna dependiente del combinado sea la 1(que en VB es la 0) podrías poner
texto7=nombredelcombinado
En el caso de que sea al elegir o escribir ponlo en el evento Después de actualizar del combinado. No hace falta lo de If... ya que estás eligiendo un valor.