Skip to main content

AccessTr.neT


Form Üzerinde Sekme Gizleme

Form Üzerinde Sekme Gizleme

Çözüldü #1
Herkese günaydın. İşim gereği lazım olan ancak yapmayı bilmediğimden elimde bulunan bir programı değiştirerek acces üzerinde bir programı değiştirdim ancak eksiklikler var. Araştırdım ancak çözüme ulaşamadım. Program üzerinde yaptığım değişlikte aslında farazi düşünmüş oldum. Bir olayda bir müşteki, bir şüpheli de olabilir birden fazlada. Ben fazla olacağını düşünerek 3 er sekme yaptım ama bu sekmelerin tek kişi olduğunda görünmemesini istiyorum. Bunun içinde kaç müşteki ve şüpheli olduğuna dair sekmede yaptım. Bu sekmeye rakam yazıldığında o kadar sekmenin aktif hale gelmesini istiyorum. Birde yakınlığı diye bir buton var. Liste kutusundan yaptım, tablosunu da yaptım ama üzerine gelince yazamadım. Üç dört kez denedim o da olmadı. Ayrıca suçlar kısmı da eski programda yeni bir bilgi girişinde kayıt yapsın mı diye soruyordu ama bu sormuyor ve suçlar tablosuna yeni bilgiyi kayıt etmiyor.  Bir de son olarak tedbir kararı geçen süre sekmesinde formülü yapamadım. Ben Excel gibi yapmaya çalıştım ancak bu günü excelde =bugün() yaptığımızda geliyor accesste de denedim ama olmadı, belki =date olur dedim oluyor ama çıkarma işlemi fonksiyonu eklemek istediğimde Ad! geliyor yani olmuyor.

1-Kısaca anlatmak gerekirse müşteki ve şüpheli sayısına göre sekmeler gizlenebilir mi?
2-Yakınlığı sekmesine bir şey yazamıyorum. Suçlar ve yakınlığı sekmesi sorgu tablosuna nasıl kayıt yapar?
3-Son olarak tedbir kararı bitiş tarihini nasıl formülize ederim?

Muhtemelen siz yardımcı olmak için buradan tarif edeceksiniz, ben deneyeceğim ve beceremeyeceğim ama ozan beyin dediği gibi tırmalamadan öğrenme olmaz.Yardımlarınızı bekliyorum. Şimdiden teşekkürler.
VBA şifresi:12
.zip AİLE İÇİ ŞİDDET KAYIT PROGRAMI.zip (Dosya Boyutu: 981,89 KB | İndirme Sayısı: 4)
Cevapla
#2
(13/12/2019, 09:41)270598 yazdı: 1-Kısaca anlatmak gerekirse müşteki ve şüpheli sayısına göre sekmeler gizlenebilir mi?
evet gizlenebilir aşağıdaki kod işinize yarayabilir
If Me.Metin0 > 1 Then
Me.TabCtl2.Pages.Item(1).Visible = True
Me.TabCtl2.Pages.Item(2).Visible = True
Else
Me.TabCtl2.Pages.Item(1).Visible = False
Me.TabCtl2.Pages.Item(2).Visible = False

End If
(13/12/2019, 09:41)270598 yazdı: 2-Yakınlığı sekmesine bir şey yazamıyorum.
denetim kaynağındaki =[YAKINLIĞI] yerine sadece YAKINLIĞI yazmayı deneyin

Not :çalışmanız hem şifre korumalı hem de başlangıçta tasarım ve düzenlemeyle ilgili alanların hepsi devre dışı bırakılmış.
şifreyi kaldırıp tasarım özelliklerini aktifleştirerek eklediğinizde çözüme daha kolay ulaşırsınız.
Not 2:her konunuzda tek soru sorun
not 3: forum kurallarını ve Yapılmaması Gereken Ölümcül Hatalar konularını mutlaka inceleyin.
Cevapla
#3
Merhaba,
Dosya ektedir.

Bir de size tavsiyem, tablo ve alan adlarında türkçe karakter kullanmayın.
.rar AİLE İÇİ ŞİDDET KAYIT PROGRAMI_KJS.rar (Dosya Boyutu: 922,7 KB | İndirme Sayısı: 23)
Herkes aynı şeyi düşünüyorsa, kimse yeterince düşünmüyor demektir
Cevapla
#4
Sayın KJS program dediğim gibi olmuş lakin bir şey sormak istiyorum. Mesela müşteki sayısını girdiğimizde sekme kapanıyor ama form sekme açılıp kapandığında büyüyüp küçülmez mi? bu yapılabilir mi? yani sadece sayı girince sekme gizlenip açılması değilde formun genişleyip küçülmesi olmaz mı? Niye derseniz çok fazla sekme var ve ekrana sığmıyor.
Cevapla
#5
formun ebatlarını belirlemek için  formun yüklendiğinde olay yordamına  
DoCmd.MoveSize 15900, 10200      yazarsanız bu ölçüde açılır 
 15900 genişlik  10200 yükseklik ölçüleridir siz kendi formunuzu istediğiniz ölçüye ayarlayınız
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task