Fatal error encountered during command execution

MysqlConn = New MySqlConnection
        MysqlConn.ConnectionString = "server=localhost;userid=root;database=stock_sales_system"
        Dim SDA As New MySqlDataAdapter
        Dim dbDataSet As New DataTable
        Dim bSource As New BindingSource

        Try
            MysqlConn.Open()
            Dim query As String
            query = "SELECT SUM(Quantity) AS Sold
                     FROM invoice_products AS IP, invoice AS I
                     WHERE ProductBarcode LIKE @ProductBarcode AND IP.InvoiceNumber = I.InvoiceNumber AND I.InvoiceDate >= @FromDate AND I.InvoiceDate <= @ToDate;"

            Command.Parameters.Add("@ProductBarcode", MySqlDbType.VarChar).Value = frmManageProducts.ProductTableAdapter.GetBarcode1(cbxProductName.Text)
            Command.Parameters.Add("@FromDate", MySqlDbType.Date).Value = dtpFrom.Value
            Command.Parameters.Add("@ToDate", MySqlDbType.Date).Value = dtpTo.Value

            Command = New MySqlCommand(query, MysqlConn)
            SDA.SelectCommand = Command
            SDA.Fill(dbDataSet)
            bSource.DataSource = dbDataSet
            DataGridView1.DataSource = bSource
            SDA.Update(dbDataSet)
            MysqlConn.Close()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        Finally
            MysqlConn.Dispose()
        End Try