Asignar el valor a un texto dependiendo de un Cuadro combinado

Hola expertos.

Cordial saludo, quiero preguntarles como puedo yo asignar a un cuadro de texto, el valor que esta almacenado en un cuadro combinado, pues resulta que tengo un cuadro combinado y cuando lo cambio a cuadro de texto se pierde el valor, e intentado haciendo pruebas con el siguiente código:

Dim i As Long
Dim strTemp As String
' recorremos todos los elementos
For i = 0 To Me.Electores_Curso.ListCount - 1
' construimos una cadena con cada uno de los valores
''''''''' strTemp = strTemp & Me.Electores_Curso.ItemData(i) & vbCrLf
strTemp = Me.Electores_Curso.ItemData(i)
Next
' mostramos el resultado
MsgBox strTemp

Pero me sirve cuando le doy siguiente registro mas cuando le doy santerior registro o cuando pongo el código en el evento Form_open me toma el primer registro mas no el valor que debe de ser.

Gracias

Att. Hernán Camilo

Añade tu respuesta

Haz clic para o