Si quieres activar el option button:
- Private Sub CmdMyButton_Click() 
- Option1.Enabled = True 
- End Sub 
O... si unicamente deseas cambiarle el nombre:
- Private Sub CmdMyButton_Click() 
- Option1.Caption = "Activaste el caption" 
- End Sub 
-   
- Private Sub Form_Load() 
- Option1.Caption = "" 
- End Sub 
La verdad no se entendió muy bien la pregunta, pero cualquier cosa, puedes ser un poco más preciso y trataremos de ayudarte.