Skip to main content

AccessTr.neT


Access Optionbutton Class Yardım

Access Optionbutton Class Yardım

Çözüldü #1
Merhaba.

Ekte optionbuttonlar var.
Bunların hangisine tıklarsam sadece o iseçilmeli Class ile.

Saygılar.

Class kodlar;
Visual Basic Code
Option Compare Database

Public WithEvents opt As OptionButton

Private Sub opt_Click()
    
    Dim xx As Control
    For Each xx In Forms("FormOptionButton")
        If TypeOf xx Is OptionButton Then
          MsgBox xx.Name
        End If
    Next
    
End Sub


Form kodlar;
Visual Basic Code
Option Compare Database

Dim kontrol() As New ClsOptionButton

Private Sub Form_Load()

    Dim cont As Control
    Dim say As Integer
    
    For Each cont In Forms(Me.Name)
        If TypeName(cont) = "OptionButton" Then
            say = say + 1
            ReDim Preserve kontrol(1 To say)
            Set kontrol(say).opt = cont
        End If
    Next
  
End Sub
.rar Class optionButton.rar (Dosya Boyutu: 26,66 KB | İndirme Sayısı: 0)
Son Düzenleme: 15/01/2020, 02:38, Düzenleyen: feraz.
Cevapla
#2
Çerçeve içine aldınız mı
Cevapla
#3
(15/01/2020 07:26)accessman Adlı Kullanıcıdan Alıntı: Çerçeve içine aldınız mı

Üstad dün tesadüf buldum.Eğer activex denetimden optionbuuton seçersem sorun olmuyor ismide galiba custom ile başlıyordu.

Çerçeveyi denemiştim farketmemişti.
Bu işi çözse çözse sayın @berduş hocamız çözerImg-grin

Ondan başkada site ile ilgilenen yok galiba Administratorlardan.Kendisine bir daha teşekkür edyim şimdiye kadarki yardımlarından dolayı.

Birde class ile olmalı konu olarak.ileride kullanırım.
Commandbutton ile aynu kodda sorun olmazken bunda problem garip.
Birde diğer kare içindeki işaretli olan nesnedede çalışmıyor.
Adını getiremedim şimdi.

Birde her iki yada 3 mesajda bir forum sayfası ekleniyor.
Buda insanı yoruyor aradığımız konuları araştırırken.
Belki bunada bir el atar sayın yönetici.Tabii bu benim fikrim sadece.
Cevapla
#4
(15/01/2020 12:47)feraz Adlı Kullanıcıdan Alıntı: Birde class ile olmalı konu olarak
maalesef class hazırlayacak seviyede değilim
seçenek kutularını tek tek almak yerine
seçenek grubu olarak eklemelisiniz
[Resim: do.php?img=9446]
Cevapla
#5
(15/01/2020 12:55)berduş Adlı Kullanıcıdan Alıntı:
(15/01/2020 12:47)feraz Adlı Kullanıcıdan Alıntı: Birde class ile olmalı konu olarak
maalesef class hazırlayacak seviyede değilim
seçenek kutularını tek tek almak yerine
seçenek grubu olarak eklemelisiniz
[Resim: do.php?img=9446]

Bunu yapmıştım çalışmamıştı bende.
Cevapla
#6
(15/01/2020 12:55)berduş Adlı Kullanıcıdan Alıntı:
(15/01/2020 12:47)feraz Adlı Kullanıcıdan Alıntı: Birde class ile olmalı konu olarak
maalesef class hazırlayacak seviyede değilim
seçenek kutularını tek tek almak yerine
seçenek grubu olarak eklemelisiniz
[Resim: do.php?img=9446]

Aslında Class öğrenmek zor değil ve çok faydalı.

Lakin excelde çalışan aynı kod accesste çalışmıyor.Commandbutton ile çalışıyor aynı kod option ile olmuyor.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da