Imprimir resultado de consulta en textbox

Disculpa por volver a molestar, ahora tengo un problema parecido a la consulta anterior que hice, tengo dos tablas: empresa y empleados y cada una la manejo con forms distintas (tabla empresa la manejo en form1 y tabla empleados en form2), en la form1 selecciono una empresa por combobox y me arroja los resultados en los textbox (tema resuelto gracias a tu ayuda), en la tabla empleados tengo los siguientes campos, "id_empresa, id_trabajador, trabajador, cargo", en donde ya logre que al seleccionar la empresa en la form1, en la form2 tener un combobox con los nombres de los trabajadores de la empresa seleccionada (lo realice utilizando id_empresa), ahora viene mi problema :S, al seleccionar una opción del combobox(nombre trabajador), quiero que me imprima el cargo, pero no lo hace, lo hice de la misma manera que en el form1, pero no me resulta, ¿me podrías ayudar perfavor?
Escribo el código que estoy usando
Private Sub Form2_Load()
txtEmpresa.Text = form1.txtCodigoEmpresa
Conexion
Rst.Open "SELECT * FROM trabajador WHERE id_empresa =" & txtEmpresa, Cnn, adOpenDynamic, adLockOptimistic
Do Until Rst.EOF
cmbTrabajador.AddItem Rst.Fields("trabajador").Value
cmbTrabajador.ItemData(cmbTrabajador.NewIndex) = Rst.Fields("id_trabajador")
Rst.MoveNext
Loop
Rst.Close
End Sub
Private Sub Command2_Click()
Dim Alert
If cmbTrabajador = "" Then
Alert = MsgBox("Debe seleccionar Trabajador", vbCritical)
Else
Rst.Open "SELECT * FROM trabajador WHERE id_trabajador =" & cmbTrabajador.ItemData(cmbTrabajador.ListIndex)
txtTrabajador.Text = Rst!cargo
End If
End Sub