crear variable que funcione como las de C++

[papucho666]

Hola, quiero declarar una variable que tenga valores de 0 a 7, pero que se comporte como las variables de C++.
Por ejemplo, teniendo un valor de 7 y sumandole 1 que pase directamente al proximo valor que seria 0.

Por ahora lo hago con un

Código:

if(nomVar=7) then 
    nomVar=0
end if

Esto lo quiero hacer en VB6.

Gracias.