Skip to main content

AccessTr.neT


Modül Yazımı Hk.

Modül Yazımı Hk.

Çözüldü #1
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

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

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Modül Yazımı Hk. - Yazar: ALTANs - 29/07/2017, 17:26
Cvp: Modül Yazımı Hk. - Yazar: ozanakkaya - 30/07/2017, 19:20
Cvp: Modül Yazımı Hk. - Yazar: ALTANs - 31/07/2017, 10:57
Cvp: Modül Yazımı Hk. - Yazar: ozguryasin - 31/07/2017, 14:18
Task