1

Тема: Заповнити ComboBox унікальними значеннями

Доброго вам дня.
На формі присутній комбобокс. Дані завантажуються із БД Access. Все працює ,але в ході виконання проекту виникло питання.
Як відобразити при завантажені форми  в комбобоксі тільки унікальні значення. Дякую.
У вкладенні є приклад : проект на vb.net 2010 та файл бд

Post's attachments

Combo.7z 47.29 kb, 326 downloads since 2016-02-01 

Подякували: leofun011

2

Re: Заповнити ComboBox унікальними значеннями

ну так треба запитати з аксесу унікальні значення, там же мона юзати щось типу sql-запитів?

3

Re: Заповнити ComboBox унікальними значеннями

Да я написав в проекті,але щось не працює

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Module1.connect()

        Me.fillcombo()
        strsql = "select DISTINCT Виконавці from Таблица1 where Виконавці ='" & ComboBox1.Text & "'"
    End Sub

4 Востаннє редагувалося leofun01 (02.02.2016 07:23:56)

Re: Заповнити ComboBox унікальними значеннями

Попробуйте так:
У файлі Form1.vb

Public Class Form1
    Sub fillcombo()
        strsql = "select distinct Виконавці from Таблица1"
        ' ...
Post's attachments

Combo.zip 44.25 kb, 331 downloads since 2016-02-01 

Подякували: Юрій_, vova.vladimirovich.702

5

Re: Заповнити ComboBox унікальними значеннями

leofun01,  дякую все працює.
А при завантаженні форми цю стрічку теж залишити

strsql = "select DISTINCT Виконавці from Таблица1 where Виконавці ='" & ComboBox1.Text & "'"

6 Востаннє редагувалося leofun01 (02.02.2016 07:27:40)

Re: Заповнити ComboBox унікальними значеннями

цю стрічку можна видалити.
Я не пам'ятаю нащо її там залишив.

7

Re: Заповнити ComboBox унікальними значеннями

Видалив. Дякую за відповідь.

8

Re: Заповнити ComboBox унікальними значеннями

А не видалив же)

9

Re: Заповнити ComboBox унікальними значеннями

Що Ви маєте на увазі?