Good job on the control. – it works!

‘Note the namespace and class names. Just create two textboxes on called txtLogin and the other txtPassword
‘Make sure you make the default textbox foreground color lightgray.

Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Media

Namespace LoginNS
Partial Public Class Login
‘Make sure you make the default textbox foreground color lightgray.
Public Sub New()
InitializeComponent()
AddHandler txtLogin.GotFocus, AddressOf LoginIsFocused
AddHandler txtLogin.LostFocus, AddressOf LoginNotFocused
AddHandler txtPassword.GotFocus, AddressOf PasswordIsFocused
AddHandler txtPassword.LostFocus, AddressOf PasswordNotFocused
End Sub
Private Sub LoginIsFocused(ByVal sender As System.Object, ByVal e As RoutedEventArgs)
IsFocusedProps(txtLogin, “Enter a Login”)
End Sub
Private Sub LoginNotFocused(ByVal sender As System.Object, ByVal e As RoutedEventArgs)
NotFocusedProps(txtLogin, “Enter a Login”)
End Sub
Private Sub PasswordIsFocused(ByVal sender As System.Object, ByVal e As RoutedEventArgs)
IsFocusedProps(txtPassword, “Enter a Password”)
End Sub
Private Sub PasswordNotFocused(ByVal sender As System.Object, ByVal e As RoutedEventArgs)
NotFocusedProps(txtPassword, “Enter a Password”)
End Sub
Private Sub IsFocusedProps(ByVal focusedtxtbox As TextBox, ByVal txtboxtext As String)
If focusedtxtbox.Text txtboxtext Then
Exit Sub
End If
focusedtxtbox.Text = “”
focusedtxtbox.Foreground = New SolidColorBrush(Colors.Black)
End Sub
Private Sub NotFocusedProps(ByVal focusedtxtbox As TextBox, ByVal txtboxtext As String)
If focusedtxtbox.Text “” And focusedtxtbox.Text txtboxtext Then
Exit Sub
End If
focusedtxtbox.Text = txtboxtext
focusedtxtbox.Foreground = New SolidColorBrush(Colors.LightGray)
End Sub
End Class
End Namespace