Problema con if

[ema21del9]

Buenas, estoy haciendo la siguiente comparacion:

Código:

If stock.Fields(1) = compras.Fields(0) Then

Esto dentro de los correspondientes wend, pero parece no pasar el if, probe poniendo un msgbox a ver que mostraba stock.Fields(1) y compras.Fields(0) y SI muestran el mismo numero sin ningun espacio adicional ni nada, probe agregando Val(), Str(), Trim, etc. en la sentencia if, y aunque los valores sean los mismo nunca pasa.

Alguna sugerencia?

Pd: estos valores son tomados de una db en MySQL por si sirve de algo.

[lokoman]

Hola!!
Declara las variables
dim DATA1 AS INTEGER, DATA2 AS INTEGER

Guarda los valores en variables
DATA1=stock.Fields(1)
DATA2= compras.Fields(0)

Si los tipos de datos NO son iguales, te va a salir un error y ahi te daras cuenta que es lo que pasa... Luego haz el IF:

if DATA1=DATA2 then ...