Textbox zemin rengi

[tamer42]

Merhaba;

İki tane basit gibi görünen sorum var,

1- Textbox içerisine sadece bilgi girişi yaparken textbox içinin (zemin) rengi değişmesi,


2- Textbox' u sadece okumak için kullanmak, yani bilgi girişi yapamamak,

birde; bu durumda zemin renginin mat bir görünümde olması olasımıdır.


İyi Çalışmalar dilerim.

 

[xxrt]

Aşağıdaki Linkte bu konuya ait bilgi verilmiştir.
http://www.excel.web.tr/viewtopic.php?t=4012

 

[danersin]

Ekteki örneğe bir bakın.

 

[enigma_]

TEKT1 RENK

PSet ile ekran üzerinde istediğimiz yere istediğimiz renkte bir nokta koyabilir,
Point ile de herhangi bir noktadaki renk değerini alıp kullanabilirsiniz.
PSet ifadesinin önüne bir nesne ismi yazıp onun içindeki renk değerlerini alabilir veya point ile değiştirebilirsiniz (form1.pset... veya picture1.pset.. gibi )

PSet (250, 250), RGB(255, 125, 0)
Text1.BackColor = Point(250, 250)

 

[nolcun]

Ã?rnek bir dosya gönderirsen yardımcı olabilirim.

 

[tamer42]

Tüm arkadaşlara ilgi ve alakaları için teşekkür ederim....

2. sorunun cevabı tamam,


1. soruda öğrenmek istediğim; UserForm içerisinde birçok textbox var,

hangi textbox içerisine yazı yazılıyorsa, (yani imleç hangi textbox içerisinde ise) o textbox'un zemin renginin standart renkten başka bir renge dönüşmesi, imleç bu textbox' tan çıkınca tekrar standart rengine geri dönmesi olarak bir durum düşünmüştüm,

Selamlar, İyi Akşamlar.

 

[isakarakus]

enter olayında renklendir,
exit olayında tekrar eski haline çevir.

 

[Levent Menteşoğlu]

Textboxu seçince rengin değişmesi için aşağıdaki kodu kullanın.
[vb:1:9a8b066c18]Private Sub TextBox1_Enter()
TextBox1.BackColor = vbYellow
End Sub[/vb:1:9a8b066c18]
Textboxtan çıkınca rengin eski haline gelmesi içinde aşağıdaki kodu kullanın.
[vb:1:9a8b066c18]Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.BackColor = vbWhite
End Sub[/vb:1:9a8b066c18]

 

[tamer42]

Teşekkürler Leventm;

İstediğim tam buydu,

Herkese İyi Çalışmalar dilerim...

Kolay gelsin.

 

[danersin]

Bende tıpatıp aynı şeyi yazmıştım dosyaya :agla:

Þaka.