AccessTr.neT
Koşullu Fon - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Koşullu Fon (/konu-kosullu-fon.html)

Sayfalar: 1 2


Koşullu Fon - emel06 - 19/09/2011

Slm.
Arkadaşlar koşula bağlı font büyütmek istedim aşağıdaki kodu yazdım ama hiç bir şey olamadı yanlışım nerede acaba.
tşk.

Private Sub Form_Activate()
If Abone_Adı = TTNET Then
Me.Not_Açıklama.FontSize = 24
End If
End Sub


Cvp: Koşullu Fon - Kur@l - 19/09/2011

Sayın Emel06;
Kodunuzu Aşağıdaki ile Değiştirin Çalışacaktır.

Private Sub Form_Activate()
If Abone_Adı = "TTNET" Then
Me.Not_Açıklama.FontSize = 24
End If
End Sub



Cvp: Koşullu Fon - emel06 - 19/09/2011

slm.
sn.Kur@l, olmadı bende anlamadım dosyayı ekliyorum.
tşk.


Cvp: Koşullu Fon - Kur@l - 19/09/2011

Sayın emel06;
Ata Et, İte Ot Verdiğimiz için olmamış. Form Open Olayına YAzarsak Nasıl Olacak ki metin kutusunun güncelleme sonrası olayına ve formun geçerli olduğuna kodu yazdım...
Kolay Gelsin.
Tabi bunun bir şartla ttnet değilsede eski boyuna getirilmesi gerekli.


Cvp: Koşullu Fon - emel06 - 19/09/2011

slm.
sn.Kur@l elinize sağlık. Tüm Kayıtlarda font 24 oluyor, gayemiz sadece TTNET kaydı için açıklama metin kutusunun fontu 24 olması.
tşk.


Cvp: Koşullu Fon - Kur@l - 19/09/2011

Sayın emel06;
İlgili yerleri aşağıdaki kod ile değiştirin.

If Abone_Adı = "TTNET" Then
Me.Not_Açıklama.FontSize = 24
else
Me.Not_Açıklama.FontSize = 12
End If