örnek kod olarak alttaki kodda label lerin tag larını döngüye alarak olay yordamlarına prosedür ekleniyor
Access de bu yapılıyor fakat basic 6 da nasıl yapılır
bilgilendirirseniz sevinirim
saygılarımla
Kod:
Public Sub anamenu()
Dim ctlana As Control
Lblsayisi = 0
For Each ctlana In Me.Controls
If Left(ctlana.Name, 3) = "ana" Then
Lblsayisi = Lblsayisi + 1
ctlana.OnMouseMove = "=anaduzenle(" & ctlana.Tag & ")"
baslik.OnClick = "=anacalistir()"
End If
Next
End Subörneğin Access de label1.onclick ="[olay yordamı]" nı nasıl basic te yaparım
