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.

[boluart]

Iniciado por 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.

... y como se logra hacer en C++? (sin usar la condicional que pusiste)

[papucho666]

En C++ funcionan asi, sin tocar nada.
Declaras una variable tipo int,por ejemplo, que creo que admiten valor de 0 a 65000 y pico y si sobrepasan ese valor vuelve a cero y viceversa.

[ema21del9]

Entonces esta bien lo que dijiste solo que con unas correcciones en la sintaxis, declaras en el evento que quieras del control que quieras lo siguiente:

Código:

if variable_numeros>7 then
variable_numeros=0
endif

[papucho666]

Si, ya lo tengo hecho y funciona, pero lo quiero sacar.
Hacerlo mas eficaz al script sin tener que meter un if.

Por que es un contador y le voy tirando a un array el valor de ese contador y si es mayor de 7 me tira error de "subindice fuera del intervalo". Entonces lo soluciono con ese if. Pero quiero declarar una varable de ese tipo y asi no uso if y funciona derecho.

creo que seria con una variable enumerada, pero no se como se hace.

[boluart]

Iniciado por papucho666

En C++ funcionan asi, sin tocar nada.
Declaras una variable tipo int,por ejemplo, que creo que admiten valor de 0 a 65000 y pico y si sobrepasan ese valor vuelve a cero y viceversa.

Asi si ps, pense que te habias referido un valor maximo cualquiera, eso lo maneja internamente C++ , lamentablemente no hay un tipo de datos del 0-7, el mas pequeño es el bit (2 posibles valores), ahora tu podrias crear tu propia clase, sobrecargar el operador de suma y listo, pero creo que en vb6 no se puede sobrecargar operadores.
Otra opcion seria manejandolo como propiedades de una clase
de este modo lo controlarias al moemnto de obtener y asignarle valores.

[papucho666]

Iniciado por boluart

Asi si ps, pense que te habias referido un valor maximo cualquiera, eso lo maneja internamente C++ , lamentablemente no hay un tipo de datos del 0-7, el mas pequeño es el bit (2 posibles valores), ahora tu podrias crear tu propia clase, sobrecargar el operador de suma y listo, pero creo que en vb6 no se puede sobrecargar operadores.
Otra opcion seria manejandolo como propiedades de una clase
de este modo lo controlarias al moemnto de obtener y asignarle valores.

Ok, la idea debe ser buena, pero al final se complica mas que utilizando el if, asi que lo voy a terminar dejando no mas.

Es un programita para manejar unos leds por el puerto paralelo, son los pirmeros experimentos asi que no va a afectar el "rendimiento" del programa.

[David]

Lo que puedes hacer es usar el operador de resto al asignar:

Código vb:

Numero = 7
Numero = (Numero + 1) Mod 8 'Resultado: 0
Numero = 7
Numero = (Numero + 2) Mod 8 'Resultado: 1
 

[papucho666]

UUhhh, muchas gracias david el groso. Lo voy a probar creo que eso es justo lo que estaba buscando.
Muchas gracias. Muy util.