Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
18/01/2018 12:31
Konu Sahibi
haziran4
Yorumlar
2
Okunma
334
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

haziran4

Aktif Üye
6706
 43
 54
 179
 15/05/2009
0
 Eskişehir
 
 Ofis 2007
 Bugün,09:15
Çözüldü 
Gelir işlem Türünden Ürün Alımı Seçilldiğinde Firmalar geliyor. diğerleri seçildiğinde firma gelmiyor.3. koşul olarakta Bankaya yatan Seçildiğinde Banka Adı gelmesini ve şubenin de gelmemesini nasıl yapabilirim.
Yani Ürün Bankaya Yatan Seçildiğinde de Gider Firma ve Şube Görünmeyecek Banka Adı Gelecek.

Ürün Alımı Haricinde Seçildiğinde  Aşağıdaki gibi Oluyor.
[Resim: do.php?imgf=151626745262521.jpg]
.
Ürün Alımı Seçildiğinde Aşağıdaki Gibi Oluyor.
[Resim: do.php?imgf=151626773762471.jpg]
.

Bankaya Yatan Seçildiğin de de Aşağıdaki Gibi gelmesini nasıl yapabilirim.
[Resim: do.php?imgf=151626751094191.jpg]


haziran4, 15-05-2009 tarihinden beri AccessTr.neT üyesidir.

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 482
 12.058
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Bugün,00:30
Sub Duzenle kodunu aşağıdaki ile değiştirerek deneyiniz.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
Sub Duzenle()

If Box_GiderislemTuru.Column(1) = "2" Then

    Me.Box_SubeAdi.Top = 1920
    Me.Aciklama.Top = 2345
    Me.GiderMiktar.Top = 2765
    Etiket4.Top = 1920
    Etiket7.Top = 2345
    Etiket8.Top = 2765
    Box_Gider_Firma.Visible = True
    Box_Banka_Adi.Visible = False
    Me.Box_SubeAdi.Visible = True
ElseIf Box_GiderislemTuru.Column(1) = "0" Then

    Me.Box_SubeAdi.Top = 1920
    Me.Aciklama.Top = 2345
    Me.GiderMiktar.Top = 2765
    Etiket4.Top = 1920
    Etiket7.Top = 2345
    Etiket8.Top = 2765
    Box_Gider_Firma.Visible = True
    Box_Banka_Adi.Visible = True
    Me.Box_SubeAdi.Visible = False
  
Else

    Me.Box_SubeAdi.Top = 1560
    Me.Aciklama.Top = 1985
    Me.GiderMiktar.Top = 2405
    Etiket4.Top = 1560
    Etiket7.Top = 1985
    Etiket8.Top = 2405
    Box_Gider_Firma.Visible = False
    Box_Banka_Adi.Visible = False
    Me.Box_SubeAdi.Visible = True
     
End If


End Sub


"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. 

haziran4

Aktif Üye
6706
 43
 54
 179
 15/05/2009
0
 Eskişehir
 
 Ofis 2007
 Bugün,09:15
Üstad Teşekkür Ederim.


haziran4, 15-05-2009 tarihinden beri AccessTr.neT üyesidir.


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Gruba Göre Form Çağırıp, Forma Ekleme magmar 8 206 21/05/2019, 12:28
Son Yorum: magmar
Çözüldü Açılır kutudan kayıt girişi yapmak yuppi23 4 1.719 24/04/2019, 15:57
Son Yorum: Aşkın Güngör
Çözüldü Access Formdaki Renkli Alanları Excele Renkli Olarak Aktarma IceMan7 6 378 10/04/2019, 15:27
Son Yorum: IceMan7
Çözüldü Liste Kutusu Yada Açılan Kutu Hakkında programmer67 6 247 26/03/2019, 15:21
Son Yorum: programmer67
Çözüldü İki Tarih Arası Ay Bazında Satır Ekleme fkilic76 6 293 06/03/2019, 09:13
Son Yorum: haliliyas

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