Protected Sub btnSignup_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnSignup.Click con.Open() com.Connection = con com.CommandText = "SELECT userName FROM signUp WHERE userName =@userName" com.Parameters.Add(New SqlClient.SqlParameter("@userName", txtUsername.Text)) Dim str As String = com.ExecuteScalar If str = "" Then lblusernametaken.Visible = False Else lblusernametaken.Visible = True Exit Sub End If End sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)