به سراغ من اگر بیایید

Private Sub Form_Load()
Option1.Value = False
Option2.Value = False
Text1.BackColor = vbRed
Text2.BackColor = vbBlue
Text1.Visible = False
Text2.Visible = False
End Sub

Private Sub Option1_Click()
If Option1.Value = True Then
Text1.Visible = True
Text2.Visible = False
End If
End Sub

Private Sub Option2_Click()
If Option2.Value = True Then
Text2.Visible = True
Text1.Visible = False
End If
End Sub