Intanto controlla che sul DB il campo sia di tipo Numenrico, in secondo luogo prova questa soluzione:

if dado1 > dado2 then
risult = "Hai Vinto"
bet = Cint(cristalli) + Cint(puntata)
end if