Imports MySql.Data.MySqlClient

Public Class PIS

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

    cn.ConnectionString = "server=localhost; userid=circuit; password=password; database=pis;"
    cn.Open()
    MsgBox("Connected")
    switchpanel(search)

End Sub

End Class