AccessTr.neT

Tam Versiyon: label olay yordamını prosedurde tanımlamak
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
selam
ö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
yeni aklıma gelen bir şey
örneğin Access de label1.onclick ="[olay yordamı]" nı nasıl basic te yaparım
Kod:
support.microsoft.com/en-us/kb/190670


burada örnek kodlar verilmiş.