Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Modül Yazımı Hk.

ALTANs
ALTANs
Access Cevaplanmış Soruları
3
1216

Modül Yazımı Hk.

Çözüldü #1
ALTANs
Aktif Üye
ALTANs
Bul
Aktif Üye*
Adı Soyadı: ME.... AL....
Yaşı: 37
Konum: Balıkesir
Ofis Versiyonu: Ofis 2010 32 Bit
Son Oturumu: 16/09/2023,20:26
Yorumları: 97
Konuları: 30
Kayıt Tarihi: 10/02/2014
Teşekkür Puanı: 0
Mesleğiniz: BİLİŞİM TEKNOLOJİLER
Merhaba Arkadaşlar,
Formlarda cokca kulladığım bir kod dizimini modül yapmak istiyorum yardım ederseniz sevinirim.
Aşağıda kullandığım kod dizimi verilmiştir. Bir formda bundan en az 40 tane oluyor.

Kod:
Private Sub Komut54_Click()
a= "d_id=15"
Me.Metin57 = DLookup("firma_id", "dukkan_bilgi", a)
Me.ticariunvan = DLookup("f_ticari", "dukkan_bilgi", a)
Me.firmaadi = DLookup("f_kisaad", "dukkan_bilgi", a)
Me.dukkanalan = DLookup("d_alan", "dukkan_bilgi", a)
Me.sabitkira = DLookup("s_kira", "dukkan_bilgi", a)a)
Me.dukkanno = DLookup("d_no", "dukkan_bilgi", "d_id=15")
Me.baslangictarihi = DLookup("f_baslangic", "dukkan_bilgi", a)
Me.ortakgider = DLookup("s_ortakgider", "dukkan_bilgi", a)
End Sub

her komutta d_id=15 21 21 gibi değişiyor bu yüzden bi kere yazmak istiyorum. Aşağıdaki gibi
Kod:
Private Sub Komut54_Click()
a = 15
Call firmaincelekodu
End Sub

Private Sub Komut55_Click()
a = 16
Call firmaincelekodu
End Sub
Son Düzenleme: 29/07/2017, 17:27, Düzenleyen: ALTANs.
Cevapla
#2
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: Dün,15:36
Yorumları: 13.542
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
Merhaba, bu tür sorularda örnek uygulama ekler form ismini belirtirseniz daha hızlı cevap alırsınız. Sorunuza çözüm araması muhtemel kişiler sorunuzu okuyup sonraki soruya geçer

Modüle aşağıdaki kodu ekle

Public Function BilgiAktar(Gid As String)



Forms!Form1.Metin57 = Dlookup ("firma_id", "dukkan", "[d_id]= " & Gid)



End Function

Form ismi ne olduğunu bilmediğim için koda Form1 yazdım.

Siz formdaki butonun tıklandığında olayına

Call BilgiAktar(33)

yazarsanız d_id değeri 33 olan veriye ait firma_id değerine ulaşabilirsiniz.

Diğer alanların da modüldeki fonksiyona dahil edilmesi gereklidir.
Cevapla
#3
ALTANs
Aktif Üye
ALTANs
Bul
Aktif Üye*
Adı Soyadı: ME.... AL....
Yaşı: 37
Konum: Balıkesir
Ofis Versiyonu: Ofis 2010 32 Bit
Son Oturumu: 16/09/2023,20:26
Yorumları: 97
Konuları: 30
Kayıt Tarihi: 10/02/2014
Teşekkür Puanı: 0
Mesleğiniz: BİLİŞİM TEKNOLOJİLER
Çok teşekkür ediyorum hocam elinize sağlık.
Cevapla
#4
ozguryasin
Uzman
ozguryasin
www Bul
Uzman
Adı Soyadı: Öz.... Ya....
Yaşı: 41
Konum: Bursa
Ofis Versiyonu: Ofis 2016 32 Bit
Son Oturumu: 07/07/2024,04:49
Yorumları: 1.176
Konuları: 43
Kayıt Tarihi: 23/09/2009
Teşekkür Puanı: 616
Mesleğiniz: Yazılım
Ayrıca Her formda kullanacaksan global bit değişken tanımlayıp, açılan form ismini değişkene atayıp, değişken kullanarak ta yapabilirsin.
POWER 'un Çekirgesi :=)
ozguryasin, 23-09-2009 tarihinden beri AccessTr.neT AİLESİ üyesidir.
Access'i Profesyonel Şekilde Öğrenmek İçin https://www.accesstr.net Ailesi Yeter. alkis


Site Kurallarını sorularınızın hızlı cevaplanması için kesinlikle okuyunuz.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task