Sub DBConn_MySQL()
        db_string = "server=localhost;user=root;password=wishimajaya;port=3307;database=ma star;"
        Conn3 = New MySqlConnection(db_string)
        Try
            Conn3.Open()
            MsgBox("MySQL Success")
        Catch ex As MySqlException
            MsgBox(ex.Message)
        End Try
    End Sub