Irvin Pool Panta GarciaPublicado en Vb.net

Creamos nuestros metodos.

Public Sub eventoGotFocus(ByVal e As System.EventArgs, caja As TextBox, texto As String)
   If caja.Text = texto Then
      caja.ForeColor = Color.Black
      caja.Text = ""
   End If
End Sub

Public Sub eventoLostFocus(ByVal e As System.EventArgs, caja As TextBox, texto As String)
   If caja.Text = Nothing Then
      caja.ForeColor = Color.Gray
      caja.Text = texto
   End If
End Sub

Llamamos los métodos en los eventos GotFocus y LostFocus del TextBox

Ejecutamos el proyecto

Puedes descargar el proyecto en:

https://github.com/irvinpanta/Placeholder