option button a göre değer ekleme

[erzen]

Merhabalar. şöyle bir koda ihtiyacım var yardım ederseniz sevinirim. Eğer Optionbutton1 tıklanırsa textbox1 in içindeki değerin başına (S) bunu koysun.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu denermisiniz.

Private Sub OptionButton1_Click()
    If OptionButton1 = True Then TextBox1 = "(S)" & TextBox1
End Sub