VB .NET - Login usando o componente ErrorProvider

Componentes para arrastar para o formulário:

2 Buttons;

2 TextBox;

1 ErrorProvider;

1 LinkLabel.

Código Fonte:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Me.ErrorProvider1.Clear()

        If Me.TextBox1.Text.Trim.Equals("") Then

            Me.ErrorProvider1.SetError(Me.TextBox1, "Informe o nome de usuário")

            Return

        End If

        If Me.TextBox2.Text.Trim.Equals("") Then

            Me.ErrorProvider1.SetError(Me.TextBox2, "Informe a senha do usuário")

            Return

        End If

        MsgBox("Seja bem vindo", MsgBoxStyle.Information, "LOGIN")

    End Sub

    Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked

        System.Diagnostics.Process.Start("http://henriks-si.blogspot.com/")

    End Sub

End Class

 Espero ter ajudado e até mais....