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