Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
08/06/2017 17:52
Konu Sahibi
cemre1970
Yorumlar
4
Okunma
617
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

cemre1970

Üye
90432
 Belirtilmemiş
 3
 7
 31/05/2017
0
 -
 
 -
 10/06/2017,15:40
Çözüldü 
Selamlar.
Ekteki dosyada f_hk formuna bilgi olarak yazdığım sorularım var ve çok uğraşmama rağmen beceremedim,

Yardımlarınız için teşekkürler.



ozguryasin

Uzman
9727
Öz.... Ya....
 36
 44
 1.130
 23/09/2009
613
 Bursa
 Yazılım
 Ofis 2016 32 Bit
 Bugün,09:46
lütfen kontrol edip geri bildirimde bulununuz


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.

cemre1970

Üye
90432
 Belirtilmemiş
 3
 7
 31/05/2017
0
 -
 
 -
 10/06/2017,15:40
(08/06/2017 19:38)ozguryasin Adlı Kullanıcıdan Alıntı: lütfen kontrol edip geri bildirimde bulununuz

Detay kısmı harika olmuş ellerinize sağlık

İkinci kısıma bakamadınız sanırım

Teşekkürler



ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 480
 12.053
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,16:43
Merhaba,

Lütfen sorularınızı Site Kurallarına uygun olarak sorunuz.

Örnek uygulamanızdaki rapor düzenlendi, rapora bahsi geçen toplamlar alt bilgi olarak eklendi.

Raporda ve Formdaki toplama ve sayma alanlarının bir kısmı yapılmış olup, boş olan alanların kodunu siz yazmalısınız.

Ayrıca, Bu kısmın konu başlığı ile ilgisi yok, alt formlara düzgün veri girişi yapılabilmesi için tablo yapısı değiştirildi.

f_hk isimli forma tarih ekleme butonu eklendi, Butonu tıklayıp yeni tarih yazar ve mesaj kutusuna eveti tıklarsanız, girilen tarihe ait tüm kayıtlar tabloya eklenir.

f_hk100 ve f_hk400 isimli formlara

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub KayitBul(Verim)

Me.t_hk100_alt_formu.SetFocus
DoCmd.RunCommand acCmdRecordsGoToFirst

    For i = 0 To ([t_hk100 alt formu].Form![toplami] - 1)

        [t_hk100 alt formu].Form![oda].SetFocus
            If CLng([t_hk100 alt formu].Form![oda]) = CLng(Verim) Then
            Exit Sub
            End If
        DoCmd.RunCommand acCmdRecordsGoToNext
        
    Next
[t_hk100 alt formu].Form![oda] = Verim
End Sub



Şeklinde kod eklendi ve oda no kısmındaki butonların tıklandığında olayındaki kod


Visual Basic Code
Call KayitBul(Screen.ActiveControl.Caption)


Şeklinde değiştirildi. 1. Kat sekmesini tıklayıp, 113 yazan butonu tıklarsanız altformda bu kaydı bulur. Aynı odayı tekrar alt foma kaydetmez.

Diğer altformlardaki düzenlemeleri kendiniz yapmalısınız.


Konu başlığınızdaki soru ile ilgili çözülmeyen kısım var ise bu konuya yazın, konu başlığından farklı sorunuz var ise YENİ KONU AÇMALISINIZ.

Site Kurallarımızı tekrar okuyun.


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

cemre1970

Üye
90432
 Belirtilmemiş
 3
 7
 31/05/2017
0
 -
 
 -
 10/06/2017,15:40
(08/06/2017 22:46)ozanakkaya Adlı Kullanıcıdan Alıntı: Merhaba,

Lütfen sorularınızı Site Kurallarına uygun olarak sorunuz.

Örnek uygulamanızdaki rapor düzenlendi, rapora bahsi geçen toplamlar alt bilgi olarak eklendi.

Raporda ve Formdaki toplama ve sayma alanlarının bir kısmı yapılmış olup, boş olan alanların kodunu siz yazmalısınız.

Ayrıca, Bu kısmın konu başlığı ile ilgisi yok, alt formlara düzgün veri girişi yapılabilmesi için tablo yapısı değiştirildi.

f_hk isimli forma tarih ekleme butonu eklendi, Butonu tıklayıp yeni tarih yazar ve mesaj kutusuna eveti tıklarsanız, girilen tarihe ait tüm kayıtlar tabloya eklenir.

f_hk100 ve f_hk400 isimli formlara

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub KayitBul(Verim)

Me.t_hk100_alt_formu.SetFocus
DoCmd.RunCommand acCmdRecordsGoToFirst

    For i = 0 To ([t_hk100 alt formu].Form![toplami] - 1)

        [t_hk100 alt formu].Form![oda].SetFocus
            If CLng([t_hk100 alt formu].Form![oda]) = CLng(Verim) Then
            Exit Sub
            End If
        DoCmd.RunCommand acCmdRecordsGoToNext
        
    Next
[t_hk100 alt formu].Form![oda] = Verim
End Sub



Şeklinde kod eklendi ve oda no kısmındaki butonların tıklandığında olayındaki kod


Visual Basic Code
Call KayitBul(Screen.ActiveControl.Caption)


Şeklinde değiştirildi. 1. Kat sekmesini tıklayıp, 113 yazan butonu tıklarsanız altformda bu kaydı bulur. Aynı odayı tekrar alt foma kaydetmez.

Diğer altformlardaki düzenlemeleri kendiniz yapmalısınız.


Konu başlığınızdaki soru ile ilgili çözülmeyen kısım var ise bu konuya yazın, konu başlığından farklı sorunuz var ise YENİ KONU AÇMALISINIZ.

Site Kurallarımızı tekrar okuyun.


Teşekkürler

oldukça sade ve anlaşılır olmuş.




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Yazdırma Sorunu m_demir 8 116 10/05/2019, 16:31
Son Yorum: m_demir
Çözüldü İç İçe Sekmelerde Veri Bağlama Sorunu donepezil 2 87 01/05/2019, 10:50
Son Yorum: donepezil
Çözüldü Dlookup Komutu Veri Kaydetmeme Sorunu legolasiseyes 4 204 24/04/2019, 22:15
Son Yorum: haliliyas
Çözüldü Sürekli Formda Yazılacak Verinin Otomatik Olarak Gelmesi mmert06 2 446 19/04/2019, 22:50
Son Yorum: mmert06
Çözüldü Araç Takip kayıt sorunu IceMan7 11 1.876 13/04/2019, 00:23
Son Yorum: Cüneyt Beyazsu

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.