Estoy intentando hacer un formula para login siguiendo varios tutoriales pero a la hora de poner 
"'Dim con As SqlConnection"' me dice que no esta definido, he seguido todo al pie de la letra y no encuentro el erro. Tambien me he percatado de que cuando me sugiere las siguien parte del codigo nunca sale la opcion de sqlconecction o sqlcommand, ni niguna otra.
Cabe destacar que solo llevo hecho la parte visual ya que apenas intenté hacer la conexión con la bd sql me saltó el error. No he encontrado solucion en ningun foro ni video.

```
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.Sql


Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        'Por defecto la casilla de Usuario viene con la palabra Usuario en gris, lo mismo con la casilla de contrasena
        TxtUsuario.Text = "Usuario"
        TxtUsuario.ForeColor = Color.DarkGray

        TxtClave.Text = "Contraseña"
        TxtClave.ForeColor = Color.DarkGray
    End Sub

    

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim con As SqlConnection = New SqlConnection("Data Source=LAPTOP-5AHMNOD4;Initial Catalog=Proyecto;Integrated Security=True")

        Try

        Catch ex As Exception

        End Try
    End Sub
End Class ```
Si pudieran ayudarme lo agradecería un montón. Apenas estoy aprendiendo y no he encontrado solución en internet.