[VB.NET] استفسار - نسخة قابلة للطباعة

PHP كود :
query = "update products set label=@label,label_product=@label_product,unit=@unit,date=@date,qty=@qty,tklfa=@tklfa,price=@price,total=@total where label=@label  "

        cmd = New SqlCommand(query, Module1.con)
        cmd.Parameters.AddWithValue("@label", labell.Text)
        cmd.Parameters.AddWithValue("@label_product", label_product.Text)
        cmd.Parameters.AddWithValue("@unit", UNIT.Text)
        cmd.Parameters.AddWithValue("@date", DateTimePicker1.Value)
        cmd.Parameters.AddWithValue("@qty", Val(Qty.Text))
        cmd.Parameters.AddWithValue("@tklfa", Val(TKLFA.Text))
        cmd.Parameters.AddWithValue("@price", Val(Price.Text))
        cmd.Parameters.AddWithValue("@total", Val(Qty.Text) * Val(Price.Text))


        Module1.con.Open()
        cmd.ExecuteNonQuery()
        Module1.con.Close()
        cmd.Dispose()


        MessageBox.Show("تم عملية تعديل الصنف بنجاح", "رساله تاكيد", MessageBoxButtons.OK, MessageBoxIcon.Information)


        Button3_Click(sender, e)