raporda ilkharf büyük yapmada (ı) harfi sorunu
Tarih
22/01/2012 15:16
Konu Sahibi
aguney16
Yorumlar
13
Okunma
2718
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
aguney16
Aktif Üye
Kullanici Avatari
Aktif Üye
67
26/06/2011
0
Ankara
Ofis 2003
23/01/2013,14:44
Çözüldü 
merhaba.
siteden aldığım dosyada rapor çıktısı almada diğer bütün harflerde sorun çıkmamasına rağmen "ı" harfi başa geldiğinde büyük harfe dönüşmüyor.
bunu nasıl çözeceğimiz konusunda yardımcı olursanız sevinirim.
teşekkür ederim.
Ek Dosyalar
rapor_ilkharf.büyük yapmada (ı) harfi sorunu.rar
[47.51 KB]
Cevapla

POWER
Uzman
Kullanici Avatari
Uzman
U.... Ö....
1.859
02/04/2010
İzmir
Ofis 2003
Bugün,21:05
Çözüldü 
Sponsor Reklam
İnceleyiniz...

Lütfen olumlu veya olumsuz geri dönüş yapınız...


Ek Dosyalar
.rar   rapor_ilkharf.büyük yapmada (ı) harfi sorunu.rar (Dosya Boyutu: 48,58 KB / İndirme Sayısı: 10)
Please return your positive or negative ...
Cevapla

aguney16
Aktif Üye
Kullanici Avatari
Aktif Üye
67
26/06/2011
0
Ankara
Ofis 2003
23/01/2013,14:44
Çözüldü 
sn.POWER
ilginiz için çok teşekkür ediyorum.
ilk harflerin büyüklüğünde sorun yok.
fakat kelime ortasındaki "i" harfleri "ı" olarak çıkıyor.örneğin "Kadır" gibi.
bunu nasıl çözebiliriz.
teşekkür ediyorum.

Cevapla

ercansahin
BlackEagle
Kullanici Avatari
Uzman
E.... Ş....
3.739
14/11/2008
Ankara
Ofis 2010 32 Bit
20/05/2017,13:50
Çözüldü 
Sponsor Reklam

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
Function convert(metin, secim)
    metin = Replace(metin, "I", "ı")
    metin = Replace(metin, "İ", "i")
    convert = metin
End Function

Function ilkharfbuyut(metin As String) As String
Dim deger As String, kacinci As Integer, karakter As Integer
Dim harf() As String, sayac As Integer
Dim i As Integer, yenimetin As String
karakter = Len(metin)
ReDim harf(karakter)
deger = LCase(metin)
For sayac = 1 To karakter
   harf(sayac) = convert(Mid(deger, sayac, 1), 3)
Next
kacinci = InStr(1, deger, " ")
Do While (kacinci > 0)
   harf(kacinci + 1) = UCase(harf(kacinci + 1))
   kacinci = InStr(kacinci + 1, deger, " ")
Loop
harf(1) = UCase(harf(1))
For i = 1 To karakter
   yenimetin = yenimetin + harf(i)
Next
ilkharfbuyut = yenimetin
   
End Function


Bu kodları yazın, istediğiniz yerde de ilkharfbuyut([AlanAdi]) olarak kullanın.

Not: Kodlar alıntıdır. Ama nereden aldığımı hatırlamıyorumImg-grin))

Cevapla

aguney16
Aktif Üye
Kullanici Avatari
Aktif Üye
67
26/06/2011
0
Ankara
Ofis 2003
23/01/2013,14:44
Çözüldü 
sn.BlackEagle
kodlar için teşekkür edeim.
fakat kodları nasıl yerleştireceğim.bu konuda yardımcı olursanız sevinirim.
teşekkürler.
Cevapla

ercansahin
BlackEagle
Kullanici Avatari
Uzman
E.... Ş....
3.739
14/11/2008
Ankara
Ofis 2010 32 Bit
20/05/2017,13:50
Çözüldü 
Sponsor Reklam
Buyrun inceleyin..

Ek Dosyalar
rapor_ilkharf.büyük yapmada (ı) harfi sorunu_2012-01-22.rar
[47.45 KB]
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Listede Ve Raporda Ara Toplamı Almak. m_demir 12 184 26/05/2017, 14:33 m_demir
  Barkodu Sayfaya Sığdırma Sorunu atkbursa 2 165 24/05/2017, 10:10 atkbursa
Exclamation Access'en Word'e Atarken Yazılar Yerine Id Alması Sorunu derzulya 2 107 23/05/2017, 15:27 derzulya
  Araç Takip kayıt sorunu IceMan7 10 650 18/05/2017, 19:12 ozanakkaya
  Tablolar Arası Aktarma Sorunu kübrashn 6 151 12/05/2017, 15:22 kübrashn


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status