Necesito ayuda con Timer y RadioButton

[pkj]

Es que lo tienes que poner todo junto:

Código vb:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        ProgressBar1.Value += 1
 
        If ProgressBar1.Value = ProgressBar1.Maximum Then
            Timer1.Stop()
            If RadioButton1.Appearance = Appearance.Normal Then
                MsgBox("Prueba")
            End If
        End If
 
    End Sub