CHECAR SE OPTIONBUTTON FOI CLICADO

USUARIO.EXCLUIDOS 30/05/2007 16:33:48
#218943
Como criar uma rotina pra ver se o optionbutton foi clicado (IF)? Tenho uma tela onde essa rotina tá pronta, só não lembro da sintaxe do comando. Uso array opt(0), opt(1), opt(2), etc... Quero testar pra não deixar o foco seguir se o cara não clicar no optionbutton. Só não lembro a sintaxe, não sei se devo testar vazio ("") ou verdadeiro/falso. Alguém tem uma dica?
USUARIO.EXCLUIDOS 30/05/2007 16:37:48
#218944
Resposta escolhida


Option1.value = True - Clicado
Option1.value = False - vazio


Se entendi..é isso..

Boa sorte

USUARIO.EXCLUIDOS 30/05/2007 16:47:38
#218948
Olá Netocazuza, o optionbutton tem a propriedade .Value alterada para True quando é clicado sobre ele, note bem que em um conjunto de optionbuttons apenas um recebe esta propriedade , ou seja se for o opt1(0) ele recebe opt(0).True e os demais automaticamente recebem o valor opt(1 e demais).value = False. Espero ter ajudado dúvidas entre em contato...
Forte abraço...
USUARIO.EXCLUIDOS 30/05/2007 16:56:03
#218955
Sinkertec, é isso mesmo, só não quero fazer esse teste pra cada botão (são muitos) e sim pro controle inteiro(array). opt(0), opt(1), opt(2), opt(3), etc... Sei o que pretendo, só não to conseguindo a sintaxe pra testar se qualquer um deles foi clicado pq todos tem o mesmo nome e muda só o número final (array). Seria mais ou menos assim:

if opt(como testar todos os números aqui?).value = true then
VÁ PARA O PRÓXIMO PASSO
else
FIQUE PARADO AÍ
end if

ROBIU 30/05/2007 17:57:14
#218973
Você deve usar a propriedade index do controle. Anexo um exemplo quando o controle tem o foco e quando o foco está em outro controle. Lembre que o index começa com 0.
USUARIO.EXCLUIDOS 30/05/2007 18:43:48
#218983


Neto..mais ou menos assim

Vc criou Option com index certo? Então eles ficaram assim: Option(x)..blabla

Faça um For assim

For X = 0 To NºdeOptions

If Option(X).Value = True Then
MsgBox "Continua"
Else
MsgBox "Parado"
End if
Next X

Captou meu caro..

Precisando..estaremos aí
ALEXANDREMOTA 30/05/2007 20:21:51
#218990
Opt(Index).Value = True 'O option está clicado
Opt(Index).Value = False 'O option não está clicado
ALEXANDREMOTA 30/05/2007 20:29:00
#218991
Opt(Index).Value = True 'O option está clicado
Opt(Index).Value = False 'O option não está clicado
Tópico encerrado , respostas não são mais permitidas