Ativar RadioButton no evento Show

[rafaeloliveira83 0]

Possuo dois RadioButtons um para WindowsXP e outro para Vista/Seven/8

Os dois estão com a propriedade Checked = False

Coloquei então no evento Show do formulário

Dim SO As String

SO = My.Computer.Info.OSFullName

If (SO = "Microsoft Windows XP Professional") Then
   RadioButtonXP.Checked = True
ElseIf (SO = "Microsoft Windows 7 Home Basic")  Or (SO = "Microsoft Windows 7 Enterprise") Then
   RadioButtonVistaSeven.Checked = True
End If

 

O problema que ao abrir o formulário não tica o Check do RadioButton

[KhaosDoctor 242]

Pode ser duas coisas, a primeira é que os nomes não estão corretos, a segunda é porque você não está usando o comparador certo:

 

Vamos resolver o comparador primeiro, Ao invés de usar [inline]String = "string"[/inline] você deve usar SEMPRE [inline]string.equals("string")[/inline] para comparar strings.

 

No outro caso ao invés de usar o Equals use [inline] String.Contains("string")[/inline], que vai verificar se a string CONTÉM o texto especificado, então poderia ficar assim:

 

Dim SO As String SO = My.Computer.Info.OSFullName 

If SO.Contains("Windows XP") Then   
RadioButtonXP.Checked = True 

ElseIf SO.Contains("Windows 7") Then     
RadioButtonVistaSeven.Checked = True 

End If

Assim também você verifica se ele está com qualquer tipo de Windows 7, não só o home ou o enterprise

[rafaeloliveira83 0]

Perfeito era isso mesmo.

Obrigado!