Hola,
estoy intentando pasar una aplicación de VB (embeded) a .NET
El código dice así (eVB 3.0)...
If rsCtrl.Recordcount > 0 Then
Do While Not rsCtrl.EOF
If IsNumeric(Trim(rsCtrl.Fields(0))) Then _
val1 = CInt(rsCtrl.Fields(0))
val2 = rsCtrl.Fields(1)
paramCtrl.AddItem val2
paramCtrl.ItemData(paramCtrl.NewIndex) = val1
paramCtrl.ItemData
rsCtrl.MoveNext
Loop
Ahora lo quiero pasar a VB.NET ...
If rsCtrl.Count > 0 Then
Do While Not rsCtrl.EOF
f = rsCtrl.Fields(0)
g = rsCtrl.Fields(1)
If IsNumeric(Trim(f.Value)) Then _
val1 = CInt(f.Value)
paramCtrl.Items.Add(g.Value)
paramCtrl.Items.Insert(paramCtrl.Items.GetEnumerator,
f.Value)
rsCtrl.MoveNext()
Loop
End If
Se me queja en "paramCtrl.Items.GetEnumerator"... de hecho lo que pretendo
es
añadir al índice el mismo código que hay en la columna "0" del recordset, de
esta
manera cuando el usuario selecciona un elemento en el combobox, se
actualizan
los textbox con su valor (buscando previamente en BD).
Alguien sabe como puedo implementar esto?
david
Leer las respuestas