Public Function ConnectionToMySQL() As String
        Dim strResult As String = String.Empty
        Dim bldCon As MySqlConnectionStringBuilder = New MySqlConnectionStringBuilder
        With bldCon
            .Server = "remotemysql.com"
            .Port = "3306"
            .UserID = "ххххххх"
            .Password = "ххххх"
            .Database = "хххххх"
            .CharacterSet = "utf8"
        End With
        strResult = bldCon.ToString
        Return strResult
    End Function

Dim conn As MySqlConnection = New MySqlConnection
conn.ConnectionString = "Host=192.168.0.10;port=3307;user=root;password=root"
conn.ProxyOptions.Host = "10.0.0.1"
conn.ProxyOptions.Port = 808
conn.ProxyOptions.User = "ProxyUser"
conn.ProxyOptions.Password = "ProxyPassword"
conn.Open()