Como traduzco esto de VB6 a VB.NET ?

[carlos79]

Buenos dias amigos :

Me podrían ayudar a traducir esto de VB6 a VB.NET ??? un millón de gracias...

Combo2.AddItem rst.Fields("nomprov").Value
Combo2.ItemData(Combo2.NewIndex) = rst.Fields("cod_prov").Value

saludos

carlos

[mvazquez]

Hola, lo que pretendes hacer es meter datos a un combo?

[carlos79]

Buenas tardes amigo.... Tengo un combo y le estoy cargando datos, sin embargo quiero que cuando le haga click a una opción del combo, el index sea el código que tiene asociado...

Por ejemplo : articulo PAN, index 1
articulo QUESO, INDEX 2

Quiero que sea articulo PAN, index 3546798
artículo QUESO, INDEX 332567

Saludos.

Carlos.

[mvazquez]

Bien, cuando llenas el combo debes tener un dato ValueMember y DisplayMember, es decir, el ID y su Descripcion, por ejemplo.

1 - Mexico
2 - Colombia
3 - Brasil

Cuando tu hacer click en Colombia tu selecciona cboNombre.SelectedIndex y te dara el numero 2

Ojala que eso aclare tu duda

[othix]

Asumiendo que rst es un datatable o un dataset podes setear los valores de la siguiente manera

Código vb:

combo2.datasource=rst;
combo2.dataTextField="nomprov"
combo2.datavalueField="cod_prov"
combo2.databind()
 

Datasource: donde esta tu data
DataTextField: que queres que muestre el combo
DataValueField: el valor de cada elemento dentro del combo
DataBind(): enlaza los datos al combo

OJO que no es lo mismo combo2.selectedValue que combo2.selectedindex
el primero te data en este caso el valor "cod_prov" y el otro la posicion del item dentro del combo.

Saludos

[carlos79]

Othis.... nuevamente gracias por tus prontas y tan acertadas respuestas....

EL problema como les habia posteado es que estoy migrando de VB6 a VB.NET y me ha costado un mundo modificar el sistema... jejeje

Saludos.

Carlos.