FlexGrip, For... Next, guardar variables

[gabyamenta]

Hola a Todos...
Tengo un FlexGrip con 5 datos, los cuales son

1.- Codigo del producto
2.- Descripcion del Producto
3.- Cantidad
4.- Precio Lista
5.- Precio Venta

El codigo del producto, la descripción y el precio Lista se cargan de la BD por el codigo, mientras que la cantidad y el precio de Venta se colocan manualmente en TextBox, luego se preciona un boton para colocar cada uno de los datos en el FlexGrip. Ahora bien al momento de almacenar todos los datos en una tabla de la base de datos realizo un For... Next para cada una de las lineas del FlexGrip, esto me funciona perfectamente.

La duda es la siguiente, cada vez que se carga una linea del FlexGrip requiero guardar el precio lista y precio Venta en variables a fin de utilizar nuevamente los datos.

Ej:
Tengo (02) dos productos en el FlexGrip
Codigo - Descripcion - Cant. - Precio Lista - Precio Venta
010501 - Clavo - 3 - 100 - 90
010304 - Tornillos - 5 - 150 - 100

El codigo para cada uno de los datos es el siguiente:

lngFilaAux = 0
For lngFila = 1 To Me.spdDetalle.DataRowCnt
Me.spdDetalle.Row = lngFila
Me.spdDetalle.Col = ItemCodigo
Codigo= Me.spdDetalle.Text
Me.spdDetalle.Col = ItemDescripcion
Descripcion = Me.spdDetalle.Text
Me.spdDetalle.Col = ItemCant
Cant = Me.spdDetalle.Text
Me.spdDetalle.Col = ItemPrecioL
PrecioL = Me.spdDetalle.Text
Me.spdDetalle.Col = PrecioV
PrecioV = Me.spdDetalle.Text

Next

Ahora bien como hago para guardar el precio Lista y el Precio Venta de los dos productos en variables, como por ejemplo:

PrecioLista1 = 100
PrecioLista2 = 150

PrecioVenta1 = 90
Precio Venta = 100

Esto para presentar en otro formulario

Espero haberme explicado bien, de todos modos cualquier cosa puedo aclarar alguna duda.

Gracias de antemano...