Прежде всего установите mysql-connector-net-6.0.7 и выполните следующее:
Щелкните правой кнопкой мыши на программе и добавьте ссылку, затем просмотрите mysql.data.dll
затем добавьте модуль
Назовите это соединение и скопируйте эти коды
Система импорта
Импортирует System.Data
Импортирует MySql.Data.MySqlClient
Модульное соединение
Public conn As New MySqlConnection
Public Sub ConnectDatabase()
Try
If conn.State = ConnectionState.Closed Then
conn.ConnectionString = "Server=Dell-PC;Data Source=localhost:3306;Database=dbquicklend;User ID=root;"
conn.Open()
End If
Catch myerror As Exception
MsgBox("Error in Database Connection", MsgBoxStyle.Exclamation + MsgBoxStyle.OkOnly, "Error")
End Try
End Sub
Public Sub DisconnectDatabase()
Try
conn.Close()
Catch myerror As MySql.Data.MySqlClient.MySqlException
End Try
End Sub
Конечный модуль
просто вызовите connectdatabase в любом месте программы, к которой вы хотите подключиться, или вызовите disconnectdatabase, когда вам нужно отключиться