pcworld online logo

Metin kutusu tüyoları

Eğer VB ile uzun zamandır ilgileniyorsanız metin kutusunun kullanımı ile bir probleminiz kalmamıştır. Peki bu kontrol için birkaç püf noktasına ne dersiniz?

Şifreli metin kutuları
Bir metin kutusunu pekala kullanıcı şifresi almak için kullanabilirsiniz. Bunun için metin kutusunun properties özelliklerinden PasswordChar üzerine giderek buraya kullanıcının tuşladığı her karaktere karşılık ekrana çıkacak karakteri girmelisiniz. Örneğin gerçek metni yıldız karakteriyle gizlemek istiyorsanız buraya "*" karakteri koymalısınız. Metin kutusunun bu özelliğini değiştirdiğinizde diğer özelliklerinin aynı kaldığını görürsünüz. Metin kutusunda yazılı olan şifreyi ise her zamanki gibi "Text" özelliği ile öğrenebilirsiniz. Kullanıcının gireceği karakter sayısını belirlemek için ise aşağıdaki püf noktamızı uygulayabilirsiniz.

Uzunluk kontrollü metin kutuları
Bir metin kutusuna girecek maksimum karakter sayısını belirlemek için "MaxLenght" özelliğini kullanmalısınız. Metin kutusu sadece bu özelliğe vereceğiniz sayı kadar karakter kabul edecektir.

Karakterleri Gözardı etmek
Metin kutusunun kabul edeceği karakterleri maskelemek için KeyAscii özelliğini kullanmalısınız. Aşağıdaki örneğimiz Text1 metin kutusunun sadece tuşlanan rakamları kabul etmesi için tasarlanmıştır. Klavyeden rakam dışında herhangi bir karakter tuşlanınca bip sesi verilir ve karakter değeri "0"a çevrilir.

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then
KeyAscii = 0
Beep
End If
End Sub

Salt okunur metin kutusu
Bir metin kutusundaki metnin kullanıcı tarafından değiştirilmesini istemiyorsanız. Tek yapacağınız metnin properties kutucuğuna gidip Locked özelliğine True değerini vermektir. Bunu yaptığınızda metin kutusundaki metin sabit kalacak, kullanıcı tarafından kopyalanabilecek fakat değiştirilemeyecektir.

Metin kutusunda tırnak karakteri kullanmak
Alfa numerik değişkenler Visual Basic’te iki tırnak içine alındığından otomatik olarak bir problem karşınıza çıkıyor. Değişken içerisinde tırnak karakteri geçiyorsa bunu kullanamıyorsunuz. Bunu önlemek için aşağıdaki gibi bir kod satırı kullanabilirsiniz:

Text1.Text = "PC World Online ""Internet Kullanıcıları İçin En İyi Yerli Kaynak"" "

Bu kod satırı Text1 metin kutucuğunda şu görüntüyü yaratacaktır:

PC World Online "Internet Kullanıcıları İçin En İyi Yerli Kaynak"