รบกวนช่วย แก้โค้ด asp.net ภาษา visus ให้หน่อยครับ

กรณีจะเช็คว่า ผู้ใช้กับรหัสผ่านตรงกันจะทำหน้าล็อกอินครับ ให้ผู้ใช้เป็น txt_username รหัสผ่านเป็น txt_password ในฐานข้อมูลแบบData Connection ชื่อว่า aspdbConnectionString ที่ตาราง Member มี id , username , password ครับ
#รบกวนช่วยด้วยนะครับ หรือ มีวิธีอื่นไหม

Imports System.Data.SqlClient
Imports System.Data
Imports System.Web.Security
Imports System.Web.Configuration

Partial Class Register
    Inherits System.Web.UI.Page

    Dim com As Object

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        'ตรวจสอบ
            Dim username As String
            username = txt_username.Text

            Dim Conn As New SqlConnection(ConfigurationManager.ConnectionStrings("aspdbConnectionString").ConnectionString)
            Conn.Open()
            Dim SqlUserName As String
            SqlUserName = "SELECT username FROM Member WHERE (username ='" & username & "')"

            Dim Com As New SqlCommand(SqlUserName, Conn)
            Dim CurrentName As String
            CurrentName = CStr(Com.ExecuteScalar)

            If CurrentName <> "" Then
                Label7.Text = "ผ่าน"
            Else
                Label7.Text = "ไม่ผ่าน"
            End If

    End Sub
End Class