Skip to main content

AccessTr.neT


Form Boş Gelsin

hasankorkmaz45
hasankorkmaz45
18
7354

Form Boş Gelsin

Çözüldü #13
Yanlış anlaşılmalar ortadan kalkmıştır. Açıklamanız için teşekkür ederim.
Cevapla
Çözüldü #14
Buyrun buda sizin örneğinize uygulanmış hali.. Denedim normal görünüyor. Birde siz bakın.
.rar shesap_pusulası_2010-08-06.rar (Dosya Boyutu: 199,89 KB | İndirme Sayısı: 18)
Cevapla
Çözüldü #15
Teşekkür ederim, olmuş, benim yaptığımda olay yordam hatası gibi bir ileti veriyordu.
Örneğimle ilgili bir sorum daha olacak

Örneği incelediyseniz form üzerinde bazı matematiksel işlemler yaptırmaya çalıştım. Aam başarılı olamadım, vaktin olursa bir bakabilirmisin?
Toplam Avans avans bölümünün toplamını vermesi gerekirken, Tablodan avans sütünundan verilerin toplamını alıyor.
Toplam masrafta yine form girerken girilen bilgileri toplaması gerekiyor.
Masraf kalemlerinin ilk sırasında ki harcırah kısmında bir hesaplama yapılıyor. d_km den c_km çıkartılıp bulunan rakam plakanın yanında bulunan katsayı ile çarpılması sonucu bulunacak.

daha önce =avans1 + avans2... şeklinde bir çözüm söylemişlerdi. ancak örnekteki kadar uygulayabildim. ancak malesef başaramadım.

toplam masraf yada toplam avans hesabını yapıp tekrar örnek yaparsanız yada nasıl yapacağımı anlatırsanız gerisini ben getirmeye çabalarım.
Cevapla
Çözüldü #16
Uygulamanızda yer alan formülleri
Kod:
=Nz([avans1])+Nz([avans2])+Nz([avans3])+Nz([avans4])+Nz([avans5])
Kod:
=Nz([masraf1])+Nz([masraf2])+Nz([masraf3])+Nz([masraf4])+Nz([masraf5])+Nz([masraf6])
şeklinde değiştirin.

Masraf kalemlerinin ilk sırasında yer alan harcırahın hesaplanarak tabloya kaydedilmesi için ise kod kullanmalısınız. Ancak plaka olarak tanımladığınız bu alan yerine katsayıları tutacağınız ayrı bir metin kutusu oluşturmanızı ve örneğin kaydet düğmesinin kaydetme komutlarından hemen önceye
Kod:
Me.masraf1.Value = MetinKutusu * (Me.d_km - Me.c_km)
kodunu yazmanızı (MetinKutusu sizin katsayı için oluşturacağınız yeni alanın ismi ile değiştirilmelidir.) öneririm. Bunları özellikle örneğinize uygulayarak eklemedim ki, kendiniz yaparsanız faydası olacağını düşündüm. Kolay gelsin.
Cevapla
Çözüldü #17
Mesajını aldım ilk fırsatta uygulayıpsonucu yzazacağım...
Cevapla
Çözüldü #18
arkadaşlar lütfen banada yardımcı olun.

formu actığımda kayıt gelmesin boş gelsin istiyorum ama yapamadım.

Private Sub Form_Open(Cancel As Integer)
Static MouseHook As Object
Set MouseHook = newMouseHook(Me)
End Sub

kodu yazılı olduğu için sizin vermiş olduğunuz konu nasıl ekleyeceğim.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task