AccessTr.neT
Form açarken buton yerine etiket kullanmak. - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Form açarken buton yerine etiket kullanmak. (/konu-form-acarken-buton-yerine-etiket-kullanmak.html)



Form açarken buton yerine etiket kullanmak. - yersahan - 11/06/2011

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.



Cvp: Form açarken buton yerine etiket kullanmak. - alpeki99 - 11/06/2011

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


Cvp: Form açarken buton yerine etiket kullanmak. - ercansahin - 11/06/2011

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.



Cvp: Form açarken buton yerine etiket kullanmak. - yersahan - 11/06/2011

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