asignar valor de combobox a textbox

[seques]

resulta tengo un combobox lleno con los registros de una base de datos.

tengo la tabla con estos campos
cod, nom, consec, tipo, numero
el combo muestra el nombre(nom) pero resulta que quiero que se muestre en un texbox el consec asociado al nombre seleccionado en el combo.
este es parte del code

Private Sub llecmbDocOrdPag()
'' Llena el combo de Tipo de Comprobante
Dim cDocOrdPag As clsfin_t_ord_pag_par
Dim ds As DataSet
Dim cnxDB As clsConexion

Try
cnxDB = New clsConexion
cnxDB.Login = Me.loginProp
cnxDB.Password = Me.passwordProp
cnxDB.Servidor = Me.servidorProp
cnxDB.BaseDatos = Me.baseDatosProp
cnxDB.ConectarDB()
cDocOrdPag = New clsfin_t_ord_pag_par
cDocOrdPag.conexion = cnxDB
cDocOrdPag.ordenaProp = "coddocordpag"

ds = cDocOrdPag.consultar

Me.cmbDocOrdPag.DataSource = ds.Tables(0)
Me.cmbDocOrdPag.DisplayMember = "nom"
Me.cmbDocOrdPag.ValueMember = "cod"

ds = Nothing
cDocOrdPag = Nothing
cnxDB.DesconectarDB()

Catch ex As System.Exception

Dim basErrores As New basErroresv100
basErrores.txtModulo.Text = Me.Name
basErrores.txtError.Text = "Error Cargando Combo de Documentos"
basErrores.txtDetalle.Text = ex.Message
basErrores.ShowDialog()
Me.Close()
End Try

End Sub

y en el evento cmbDocOrdPag_SelectedindexChanged hago
Me.txtConsecutivo.Text = CStr(Me.cmbDocOrdPag.SelectedValue)

me sale error al cargar el form donde esta el combo:"La conversion del tipo datarowview al tipo string no es valida" .

[FNX_NET]

k visual es 2005 o 2002

[.seb]

Eso te da porque el SelectedValue es una columna, para eso, o bien pones
Me.txtConsecutivo.Text = CStr(Me.cmbDocOrdPag.SelectedValue["NombreDeLaColumna"])
o
Me.txtConsecutivo.Text = Me.cmbDocOrdPag.Text

[jeka]

hola amigos:
quisiera saber si es posible asignar dos campos de una tabla a la propiedad ValueMember de un combobox, ya que en el combo muestro el nombre del producto y yo quiero obtener ademas el codigo del producto y su precio unitario.

gracias anticipadamente