Уникальность элементов в ComboBox

@Razvedka2020 · Регистрация: 01.01.2014

Студворк — интернет-сервис помощи студентам

Доброго времени суток уважаемые форумчане. Вновь возникла необходимость в вашей помощи. Заранее извиняюсь за глупость моего вопроса.
Имеется форма с 4 ComboBox'ами (рис.2) и БД, подобного вида (рис.1).
При загрузке формы происходит заполнение ComboBox1 через item.add названиями областей.
При выборе значения из ComboBox1 происходит заполнение ComboBox3 названиями городов:

VB.NET
1
2
3
4
5
6
7
8
SQLcommand.CommandText = "SELECT Gorod FROM AdressUPFR WHERE Oblast='" & ComboBox1.SelectedItem.ToString & "'"
        Dim SQLreader As SQLiteDataReader
        SQLreader = SQLcommand.ExecuteReader
        While SQLreader.Read()
            ComboBox3.Items.Add(SQLreader(0))
        End While
        SQLcommand.Dispose()
        SQLconnect.Close()

Собственно вопрос: какую проверку можно провести в ComboBox чтобы исключить задвоение как показано на рис.2?
Всем заранее спасибо за советы.

@ViterAlex · 06.01.2014, 18:41

очищать комбобокс перед заполнением. Рисунок не приложен

@Razvedka2020 · 06.01.2014, 18:46 **[ТС]**

рисунки

@AeroWhite · 06.01.2014, 18:47

Установить условие If

@insite2012 · 06.01.2014, 18:49

Очистка там не поможет, думаю. У ТС один город, но разные адреса, вот он и хочет, чтобы один город только раз выводился. Верно?
И да, ТС, неграмотность режет глаз... "~~Выбирите~~"...

@агерон · 06.01.2014, 18:54

1) используйте sql оператор DISTINCT
2) очищайте список элементов combobox перед заполнением

VB.NET
1
2
ComboBox3.Items.Clear();
"SELECT DISTINCT Gorod FROM AdressUPFR WHERE Oblast='" & ComboBox1.SelectedItem.ToString & "'"

@Razvedka2020 · 06.01.2014, 19:06 **[ТС]**

Агерон! Огромное тебе человеческое спасибо!

Новые блоги и статьи Все статьи Все блоги /
Перемещение выделенных строк ТЧ из одного документа в другой Maks 30.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .

@ViterAlex 8952 / 4864 / 1886 Регистрация: 11.02.2013 Сообщений: 10,246
	06.01.2014, 18:41
	очищать комбобокс перед заполнением. Рисунок не приложен 0

@Razvedka2020 40 / 35 / 9 Регистрация: 01.01.2014 Сообщений: 202
	06.01.2014, 18:46 [ТС]
	рисунки Миниатюры 0

@AeroWhite Форумчанин.NET 556 / 427 / 64 Регистрация: 12.02.2013 Сообщений: 834
	06.01.2014, 18:47
	Установить условие If 0

@insite2012 5548 / 4311 / 1218 Регистрация: 12.10.2013 Сообщений: 12,371 Записей в блоге: 2
	06.01.2014, 18:49
	Очистка там не поможет, думаю. У ТС один город, но разные адреса, вот он и хочет, чтобы один город только раз выводился. Верно? И да, ТС, неграмотность режет глаз... "~~Выбирите~~"... 0

@Razvedka2020 40 / 35 / 9 Регистрация: 01.01.2014 Сообщений: 202
	06.01.2014, 19:06 [ТС]
	Агерон! Огромное тебе человеческое спасибо! 0

Уникальность элементов в ComboBox

Решение