Tengo un archivo clase llamado " Estado"
en el cual tenia una clase con la variante asi :
y en el Formulario tenia:
PUBLIC SUB Familia_MouseDown()
Estado.PersonaBuena = (persona1.Picture = Picture["PersonaBuena.png"])
Estado.PersonaMala = (Persona1.Picture = Picture["personaMala.png"])
IF Estado.PersonaBuena THEN
Persona1.Picture = Picture["PersonaMala.png"]
ELSE 'Apagado
Persona1.Picture = Picture["PersonaBuena.png"]
ENDIF
END
Estado.PersonaBuena = (persona1.Picture = Picture["PersonaBuena.png"])
Estado.PersonaMala = (Persona1.Picture = Picture["personaMala.png"])
IF Estado.PersonaBuena THEN
Persona1.Picture = Picture["PersonaMala.png"]
ELSE 'Apagado
Persona1.Picture = Picture["PersonaBuena.png"]
ENDIF
END
Con lo cual lograba que al darle click la persona buena se convierta en mala i viceversa
ahora... necesito saber como en vez de declarar la variable "PersonaBuena AS Boolean" y "PersonaMala AS Boolean"
declarar una constante; Quiero Algo Así..
PUBLIC CONST PersonaBuena AS Boolean = persona1.Picture = Picture["PersonaBuena.png"]
suponiendo por lógica, y sabiendo que me lanzo un error ese código...
el problema radica en "Boolean", ya que pienso que es otro tipo de variante...
pero cual... ???
esta es mi gran Duda
como lograr crear dicha constante... correctamente...
espero puedan ayudarme, de antemano gracias