Sayın Serkan keleş,
paylaşılan bilgiler sorununuzun çözümüne olumlu sonuç katkısında bulundu ise,
buradan konunuzun,
Cevaplanmış Sorular Kategorisi'ne taşınmasını beyan edebilirsiniz.değilse,gerekli açıklamaları ayrıntılı yazabilirsiniz.
bilginize...iyi çalışmalar,saygılar.
(20/01/2017, 13:57)atoz112 yazdı: [ -> ]Sayın Serkan keleş,
paylaşılan bilgiler sorununuzun çözümüne olumlu sonuç katkısında bulundu ise,
buradan konunuzun,
Cevaplanmış Sorular Kategorisi'ne taşınmasını beyan edebilirsiniz.değilse,gerekli açıklamaları ayrıntılı yazabilirsiniz.
bilginize...iyi çalışmalar,saygılar.
İlk harfleri büyük yapan kod çok işime yaradı teşekkürler. Yalnızca "i" harfi başa gelirse "İ" yerine "I" oluyor ama çok da gerekli değil şu an için.
2. kodu ise kullanamadım. Daha doğrusu kodun içindeki değiştirmem gereken kısımda yanlışlık yapıyorum.
Türkçe karakterleri uygulamanın bütününde değiştirmem için de biraz zamana ihtiyacım var açıkçası.
Private Sub Sıra_No_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case 48 To 57, 96 To 105, 13, 8, 144, 46
Case 231
Case 110, 190
If InStr(Me.sirano_denetimin_adi_ne_ise_onu_yaziniz.Text, ".") > 0 Then KeyCode = 0
Case Else
KeyCode = 0
End Select
End Sub
sayın Serkan Keleş,
EK'te;
bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.
bilginize...iyi çalışmalar,saygılar.
İşyeri dışında
Access kullanamadığım için şimdi bakabildim. Çok teşekkür ederim. Çok işime yarayacak yardımlarınız.