Mostrar mensajes previos
Ordenar por
por ZØøM Se conecta desde un manicomio
pues en un formulario he agregado 3 opciones con matriz, uno es Option(1), otro Option(2) y otro Option(3)

Cuando el form se inicia por defecto se active el Option(1) y cuando hago click en otra option para cambiar se me queda activada la anterior, he probado con este código pero no funciona:

Código: Seleccionar todo

If option(3).Value = True Then
option(1).Value = False
option(2).Value = False
Else
If option(1).Value = True Then
option(3).Value = False
option(2).Value = False
Else
If option(2).Value = True Then
option(1).Value = False
option(3).Value = False

End If
End If
End If
End Sub
Alguien sabe a q se debe ?
Imagen


Nada temo, pues mantengo la verdad que es poderosa.
por Metal_Kingdom Incurable
Si lo has metido dentro de otro control (ej. Frame), sácalo.

De todos modos si ese código lo has metido en el form_load normal que no funcione... sólo hace las comprobaciones al ejecutarse, lo que tienes que hacer es codear dentro de los Option1_Click(i), para que las comprobaciones surtan efecto cuando haces click en cada control.
UDTools.net
GitHub: https://github.com/MetalUDT
por ZØøM Se conecta desde un manicomio
Naker90 escribió:No te he terminado de entender pero, has probado con el evento GotFocus?
nop no le probé, mira en esta foto se ve lo que pasa
Imagen

Se ve que presione RC4, pero la XOR sigue marcada, y no consigo que se desmarque :/
Edit , gracias Metal , si lo meti en un frame, ahora pruebo lo q me dijiste
Imagen


Nada temo, pues mantengo la verdad que es poderosa.
por ZØøM Se conecta desde un manicomio
Pink escribió:Si no creas matriz al darle click a uno el otro automáticamente pierde la selección.
Al final quite la matriz, y funciona , quedo tal que asi, xq no perdió la seleccion

Código: Seleccionar todo

Private Sub option1_Click()

option2.Value = False
option3.Value = False


End Sub

Private Sub option2_Click()

option1.Value = False
option3.Value = False

End Sub

Private Sub option3_Click()

option1.Value = False
option2.Value = False

End Sub
Imagen


Nada temo, pues mantengo la verdad que es poderosa.
Temas similares
Turbowin IQ Option Bot (Request crack) por you2004975 en Troyanos y Herramientas
Unicode vb6 crypter por 0day en Dudas y Preguntas
ajuda com vb6 por antony guedes en Dudas y Preguntas
Pedido fuentes crypters vb6 por gordosz en Dudas y Preguntas
Links sobre el tema
Variantes de tema
Responder

Volver a “VB/.NET”