کار با Option Button

[Juventus FC]

سلام بر اساتید گرامی

من دنبال یک سورس برنامه میگردم که درون آن از Option Button استفاده شده باشد میخواهم بدونم کار با این شی چه جوریه و چه کد هایی استفاده میشه، مثلا اینکه وقتی روی این Option Button فعال میشه تکست شماره 1 2 از حالت قفل در بیاد یا مثلا محتوای تکست 1 2 در تکست 3 4 کپی بشه یک همچین حالتی، این کار چه جوری با استفاده از این شی امکان پذیره ؟ ممنون.

[YasserDivaR]

Option.value=1
یعنی زمانی که تیک خورده باشه
Option.value=0 زمانی که تیک نخورده باشه
شما بسته به نیاز تون میتونید کد بنویسین واسش
مثلا

if Option1.value=1 then
text1.locked=true
end if

[Juventus FC]

یک سورس میتونید قرار بدید که مثلا با تیک دار شدن option button شماره 1 ، تکست 1 2 3 فعال بشوند و بتوان در آنها رکورد وارد کرد !؟

[YasserDivaR]

2 تا تکست باکس همراه با 2 تا Option روی فرم قرار بده و این کد رو بهش اضافه کن

Private Sub Option1_Click()
If Option1.Value = True Then
Text1.Enabled = True

Text2.Enabled = False
End If

End Sub

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