用vb做远程操作mysql数据库

Dim conn As New MySqlConnection()
Dim connectionString As String = "server=数据库服务器地址;port=端口号;user id=用户名;password=密码;database=数据库名称;"

Try
    conn.ConnectionString = connectionString
    conn.Open()
    ' 连接成功后的操作，如查询、插入、更新等
Catch ex As Exception
    ' 连接失败的处理
Finally
    conn.Close()
End Try

Dim cmd As New MySqlCommand()
cmd.Connection = conn
cmd.CommandText = "SELECT * FROM 表名"
Dim reader As MySqlDataReader = cmd.ExecuteReader()
While reader.Read()
    ' 处理查询结果
    Dim id As Integer = reader.GetInt32(0)
    Dim name As String = reader.GetString(1)
    ' ...
End While
reader.Close()

conn.Close()