Skip to main content

AccessTr.neT


Raporda İlk Harf büyük Yapma sorunu

Raporda İlk Harf büyük Yapma sorunu

Çözüldü #1
Merhabalar, Forumda ve internette istediğim cevabı bulamadım, sorunum basit ama bilmeyen için basit sözü olmaz...

Sorunum; Formdan girişleri büyük harf biçim özelliği ile yaptım aynı form üzerinde sorgulama ile rapor aldığımda rapordaki bilgi girişlerinin ilk harflarinini büyük diğerlerinin küçük olmasını nasıl sağlayabilirim?

Forumda olsa da ben anlamadım, benim gibi ihtiyacı olanlar mutlaka olacaktır. Lütfen eklediğim örnek üzerinde hocalarım ve ustalarım gösterebilir mi? saygılarımla....
.rar rapor_ilkharf.rar (Dosya Boyutu: 41,06 KB | İndirme Sayısı: 15)
Bilmiyorum kimler bozmuş düzeni,
Görmedim asla günahsız gezeni,
Allahım sen AFFET beni,
Affınla kapansın günah defterim...
Cevapla
Çözüldü #2
Rapora Metin11 ve Metin12 alanlarını ekledim. Adı ve Soyadı metin kutularını gizledim.

Örneği inceleyiniz.
.rar rapor_ilkharf.rar (Dosya Boyutu: 39,92 KB | İndirme Sayısı: 43)
Cevapla
Çözüldü #3
Bu Forum ve SİZLER Mükemmelsiniz...
Söylemeye ve takdir etmek kimseye düşmez ama bu forum adminleriyle, Moderatörleriyle ve Emekçileriyle süper.... Katkısı ve emeği olan herkese teşekkürler... Türk Milletinin bilgiye ihtiyacı var, diğer paralı sitelere örnek olur dileğimle... sitemizin ödül alacak bir site olduğunu iddia ediyorum... Herkese sevgi ve saygılarımla...
Bilmiyorum kimler bozmuş düzeni,
Görmedim asla günahsız gezeni,
Allahım sen AFFET beni,
Affınla kapansın günah defterim...
Cevapla
Çözüldü #4
Sn sledgeab üstadım, emeğinize sağlık, çok güzel olmuş.. Saygılarımla
Cevapla
Çözüldü #5
Şu anda EMİN'i Emın olarak çeviriyor.
Rapordaki kodu aşağıdaki ile değiştirirseniz daha doğru olacak gibi,

Kod:
Private Sub Ayrıntı_Format(Cancel As Integer, FormatCount As Integer)
Me.Metin11 = StrConv(Left(adı, 1) & convert(Mid(adı, 2, Len(adı) - 1), 1), 3)
Me.Metin12 = StrConv(Left(soyadı, 1) & convert(Mid(soyadı, 2, Len(soyadı) - 1), 1), 3)
End Sub

Function convert(metin, secim)
    metin = Replace(metin, "I", "ı")
    metin = Replace(metin, "İ", "i")
    convert = metin
End Function

2. mesajdaki örnek yenilenmiştir.
Cevapla
Çözüldü #6
(18/02/2010, 01:09)orhanacan yazdı: Bu Forum ve SİZLER Mükemmelsiniz...
Söylemeye ve takdir etmek kimseye düşmez ama bu forum adminleriyle, Moderatörleriyle ve Emekçileriyle süper.... Katkısı ve emeği olan herkese teşekkürler... Türk Milletinin bilgiye ihtiyacı var, diğer paralı sitelere örnek olur dileğimle... sitemizin ödül alacak bir site olduğunu iddia ediyorum... Herkese sevgi ve saygılarımla...

Bizleri onurlandırdığınız için biz teşekkür ederiz.

Saygılar.
Sn Sledgeab emek ve örnek için teşekkürler. Saygılar...
Bilgi paylaşıldıkça çoğalır....
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.


Access için her zaman lazım olacak konu başlıkları listesi


Son Düzenleme: 18/02/2010, 08:10, Düzenleyen: benremix.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da