Küçük harf ile form girişlerinin tabloya büyük harf ile aktarılması

1 2
11/04/2011, 20:02

volkan1

Herkeze iyi çalışmalar. Sorum ve sorunum ; bir metin kutusuna yapılan kayıt girişleri zaman zaman capsloock olayından küçük harf olarakta kayıt girilebiliyor. Büyük harf veya yanlışlıkla küçük harf ile yapılan girişlerin tabloda görselliği bozmayacak şekilde tamamı büyük harf olacak şekilde tabloya aktarabilirmiyiz. Tşk.
11/04/2011, 20:11

Yandemir

metin kutusunun onexit olayına
örnek:
text9 ise

me.text9=ucase(me.text9)

yazın
11/04/2011, 20:16

volkan1

Yardımınız için teşekkürler. Konu çözülmüştür.
11/04/2011, 20:17

Coskun0559

Sub cevir()
Me.ADI.Value = UCase(Me.ADI.Value)
Me.SOYADI.Value = UCase(Me.SOYADI.Value)
End Sub


Private Sub ADI_Exit(Cancel As Integer)
Call cevir
End Sub



Private Sub SOYADI_Exit(Cancel As Integer)
Call cevir
End Sub
11/04/2011, 20:22

Yandemir

hatta türkçe sorunu yaşarsanız ki yaşayacksınız
kodu aşağıdaki şekilde yazın derim.

me.text9 = Replace(me.text9, "i", "İ")
me.text9 = Replace(me.text9, "ı", "I")
me.text9 = UCase(me.text9)
11/04/2011, 20:25

volkan1

(11/04/2011, 20:17)coskun_cakal yazdı:
Sub cevir()
Me.ADI.Value = UCase(Me.ADI.Value)
Me.SOYADI.Value = UCase(Me.SOYADI.Value)
End Sub


Private Sub ADI_Exit(Cancel As Integer)
Call cevir
End Sub



Private Sub SOYADI_Exit(Cancel As Integer)
Call cevir
End Sub

Teşekkürler
1 2