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