AccessTr.neT

Bul · 11/06/2011, 17:38

Merhabalar, bir giriş formu hazırlamaya çalışıyorum.Command Button yerine etiketlerden yararlanmaya çalıştım.(Bu gün sitede gördüğüm bir örnekten çok etkilendim) form üzerine koyduğum etikete;
Private Sub Etiket6_Click()
Me!Sub.SourceObject = "Form_asgariucret1"
End Sub olarak yazdım ama hata mesajı veriyor .Başvurulan Sub alanının bulunamadığını anlıyorum. Ne yapmam lazım acaba.Tşkr.

Bul · 11/06/2011, 18:41

Örnek dosya eklerseniz daha iyi yardım alırsınız.

Bul · 11/06/2011, 18:56

Ben bununla ilgili size bir öneride bulunayım. Yapmak istediğiniz işlemi, örneğin bir düğmeyi sihirbaz ile oluşturun, sonrada sihirbazın oluşturduğu

Kod:

Private Sub Komut5_Click()

On Error GoTo Err_Komut5_Click



    Dim stDocName As String

    Dim stLinkCriteria As String



    stDocName = "FORM_ADI"

    DoCmd.OpenForm stDocName, , , stLinkCriteria



Exit_Komut5_Click:

    Exit Sub



Err_Komut5_Click:

    MsgBox Err.Description

    Resume Exit_Komut5_Click

    

End Sub

kodundan

Kod:

On Error GoTo Err_Komut5_Click



    Dim stDocName As String

    Dim stLinkCriteria As String



    stDocName = "FORM_ADI"

    DoCmd.OpenForm stDocName, , , stLinkCriteria



Exit_Komut5_Click:

    Exit Sub



Err_Komut5_Click:

    MsgBox Err.Description

    Resume Exit_Komut5_Click

bölümünü alın ve etiketinizin tıklandığında olay yordamına yapıştırın.

Bul · 11/06/2011, 19:12

Arkadaşlar,verdiğiniz bilgilerden ve ilginizden dolayı hepinize teşekkür ederim.İyi akşamlar

AccessTr.neT

Form açarken buton yerine etiket kullanmak.

Form açarken buton yerine etiket kullanmak.

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

Giriş yap

Hesap oluştur

Konu Linkleri