Textbox с вводным текстом

[SlimBr0ther]

в VB проекте создана форма с текстбоксом. Можно ли как-то сделать так, что бы при открытии этой формы в текстбоксе был какой-то текст серого цвета, например "введите данные", а когда текстбокс активируешь (ставишь на него курсор) серый текст пропадает, а буквы, уже вводимые заново, вводятся чурным обычным цветом? Я такое видел на html страничках, не знаю, возможно ли здесь такое. Зарание спасибо за ответ! Антон

[Noor]

Выставь в свойствах ТексБокса Text "свой текст",а в ForeColor выбери нужный тебе цвет.
Затем в обработчик TextBox1_MouseDown такой код
TextBox1.Text = ""
TextBox1.ForeColor = Black

Это выглядит так

Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
TextBox1.Text = ""
TextBox1.ForeColor = Black
End Sub

теперб после нажатия на текстбокс цвет вводимого текста станет черным

Пример : http://slil.ru/24656275

[SlimBr0ther]

попробую - спасибо большое!

[pashulka]

Можно использовать и другие события, например :

Private Sub TextBox1_Enter()
    Me.TextBox1.ForeColor = RGB(0, 0, 0) 'vbBlack
End Sub

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    Me.TextBox1.ForeColor = RGB(100, 100, 100)
End Sub