Dim strFiltro As String
                Dim strFiltro1 As String
                strFiltro = TextBox4.Text
                strFiltro1 = TextBox5.Text
                ScaricoBindingSource.Filter = "Marca like '%" & strFiltro & "%' and Modello like '%" & strFiltro1 & "%'"
                MsgBox("Trovati " & Me.ScaricoDataGridView.Rows.Count.ToString() & " pneumatici.")