seçenek düğmesi

[metinS]

Bu kod ne için çalışmıyor?

Private Sub Komut8_Click()
If Me.Seçenek3 Then
MsgBox "Birinciyi seçtiniz"
Else
MsgBox "İkinciyi seçtiniz"
End If
End Sub

 

[metinS]

Biraz daha çalışınca oldu.O böylede oldu


Private Sub Komut8_Click()
Select Case Çerçeve0
Case 1
MsgBox "Birinciyi seçtiniz"
Case 2
MsgBox "İkinciyi seçtiniz"
End Select
End Sub