Pytanie : Karma combobox VB6

Cześć przykład,

I potrzeba sprawnie 2 combobox ale w zależności od the pierwszy combobox, ono filtrować the second.
For przykład:

If i wybierać w combobox1 ("ComDateDisponible.text") the tekst: August 10, 2010, ono filtrować wszystkie rząd w mój dostęp db który mieć the ten sam tekst w szpaltowy "Période", i karma combobox2 ("Des_prod.Text") z the tekst w szpaltowy "Description_du_produit" the ten sam row.

How móc i 2010 zadawalać?

Thanks dla twój help.
(1):
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
 ' Data dostępny
Ciemnawy sSQL3 Sznurek
  Ciemnawy oConnect3 Jako ADODB.Connection
  Set oConnect3 = Nowy ADODB.Connection
  Ciemnawy oRST3 Jako ADODB.Recordset
  Set oRST3 = Nowy ADODB.Recordset


sSQL3 = "WYBIÓRKA ODRĘBNY [Période] OD [Inventaire] '"

oConnect3.Open "Provider=Microsoft.ACE.OLEDB.12.0; " & _
"Dane Source=" & Form4.txt BaseDe.Text

ComDateDisponible.AddItem ""
oRST3.Open sSQL3, oConnect3
Do oRST3.EOF
  ComDateDisponible.AddItem oRST3 ("Période")
  oRST3.MoveNext
Pętla

Odpowiedź : Karma combobox VB6

My mieć the pełny obraz, ale I myśleć ty potrzeba myśleć jak myśleć?
(1):
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
Okręt podwodny ComDateDisponible_Click ()
Ciemnawy sSQL3 Sznurek
  Ciemnawy oConnect3 Jako ADODB.Connection
  Set oConnect3 = Nowy ADODB.Connection
  Ciemnawy oRST3 Jako ADODB.Recordset
  Set oRST3 = Nowy ADODB.Recordset


sSQL3 = "WYBRANY Description_du_produit  OD [Inventaire] dokąd Periode =" & CDate (ComDateDisponible.Text)

oConnect3.Open "Provider=Microsoft.ACE.OLEDB.12.0; " & _
"Dane Source=" & Form4.txt BaseDe.Text

Des_prod.Clear
oRST3.Open sSQL3, oConnect3
Do oRST3.EOF
 Des_prod.AddItem oRST3 ("Description_du_produit")
  oRST3.MoveNext
Pętla

Końcówka Okręt podwodny
Inne rozwiązania  
 
programming4us programming4us