If ComboBoxPeriodoBolla.Text <> "Intero Anno" Then
            If where.Length > 0 Then where = where & " AND "
            where = where & "Month(R_DataDocumento) = " & (ComboBoxPeriodoBolla.SelectedIndex().ToString) & ""
        End If