Klicanje podatkov iz baze preko ID-ja v VB??

Imam bazo Vreme.mdb z tabelo Napoved in dvemi stolpci "ID" in "Prognoza".
Imam tudi formo za vnos podatkov. Na to formo bi rad klical podatke iz prej omenjene baze se pravi iz šifranta. Rad pa bi naredil na ta način, da bi imel gradnik textbox poleg njega pa gradnik label, oba prazna. V textbox bi rad vpisal ID številko iz baze, pritisnil Enter in v polju label bi se mi izpisal podatek ki pripada temu ID-ju v bazi. Skratka rad bi klical podatke iz šifranta samo z številkami.
Ali se komu sanja kako bi lahko to naredil. Kakšna ideja.
Hvala za odgovor...

Hm..SQL ..nekaj sem poizkušal...
SQL poznam toliko, da znam iz baze izbrskati potrebne podatke v datagridu na podlagi SELECT xx FROM xx WHERE XX.
V bazo pa se znam priklopiti z Adodc kontrolo.
V bistvu ne znam povezati odvisnosti gradnika label z texboxom. Kako narediš sploh z SQL-om da na podlagi vnesene cifre izpiše podatek pripadajoč cifri. Verjetno bi moral ob Form_Load narediti priklop na bazo šifranta in potem narediti label "občutljiv na textbox" ali kako?...

Hvaležen bom za vsak nasvet...

Najprej hvala za odgovor...

Nekaj sem probal.. A mi lahko malo razložiš kaj vse moram deklarirati, kje priklopim bazo in kaj pomeni tista rs1!ImeStolpca.. <----pri temu javi napako

Hvala.

Ne vem koliko še to rabiš zato bom bolj kratek (in skop).

Jaz bi to naredil tako:
Na formo dodam kontroli Data in recimo DBGrid.
Potem rečem da je Data.database... Data.recordsource=SQL
SQL pa je seveda Opis iz tabele XXX za ID XXX (ki je vpisan v txtboxu ali comboju).
Potem rečem le še:
Label.caption=DBGrid.Seltext (ker je vedno le en zadetek).

Če ti kaj ne bo delalo ali če to sploh še rabiš pove, pa napišem točno kodo.

LP

P.S. Zvonko tebe pa tudi jaz nisem povsem razumel. Morda zato ker sem začetnik (se vidi tudi na moji primitivni rešitvi - ki pa dela!).

Probej tole. Teoretično dela, v praksi pa ni sprobano.

Questions can be asked here.

 Private cn As ADODB.Connection 
 Private Seznam As Collection
 
 Sub Form_Load() 
 Set cn = New ADODB.Connection
 cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=baza.mdb"
 cn.Open
 End Sub
 
 Sub NaloziPodatke()
 Dim rSet As New ADODB.Recordset
 Set seznam = New Collection
 
 With rSet
 .Open "SELECT * FROM Tabela", cn, adOpenStatic, adLockOptimistic
 ' Move To last record to get a RecordCount, then move back.
 .MoveLast
 .MoveFirst
 End With
 
 Do While Not rSet.EOF
 List1.AddItem rSet!ImePolja
 Seznam.Add(rSet!ImePolja, rSet!ID)
 Loop
 End Sub
 
 Sub Text_KeyUp() 
 If KeyAscii = 13
 Label1.Caption = Seznam.Item(Text1.Text)
 End If
 End Sub
 

Ups... Mislm, da rabiš v tisti vrstici brisat oklepaje...

Če ne javi nobene napake, potem dela "pravilno", vendar pravilno le za compiler. To je podobno kot črkovalnik v Wordu: Če se stvar podreja pravilom je zanj pravilna, pa tudi če je na napačnem mestu.

In če je stvar pravilna za compiler, ampak ne dela, potem je nekaj narobe.
Kaj bi pa moglo bit narobe nimam pojma. Na pogled bi mogla stvar delovat, ni mi pa jasno zakaj ne.
Če ti ne izpisuje nič, je verjetno kaj narobe z vnosom ID cifre. Poskusi počistit string (trim()) ali pa ga spremenit v integer (cint()) ali kaj podobnega.
Lahko probaš tudi "Label1.Caption = Seznam.Item(Text1.Text)" dat v proceduro "Text1_Change".
Skratka, igraj se!

Pa pol po možnosti če že ne poveš kako si naredil, povekj vsaj al ti je ratal al ne

Ne skrbi, tako kot pravi stari pregovor: Počasi se daleč pride.
Nihče se ni še rodil, da bi vse znal. Sploh pa nekaj volje lahko naredi veliko. Le obupat ne. Čeprav je na začetku veliko napak, nejasnosti in podobnih situacij, ko si človek razbija glavo zakaj za vraga to ne dela, čeprav bi moralo, naj te to ne odvrne. Ponavadi je razlog tega razbijanja glave ob zid prav banalen. Verjemi.

Pa še to, glede napake, da VB "pričakuje izraz". To je pogosta napaka, ki jo v VB-ju(programerji) delamo. Stvar je v tem, da če kličeš proceduro ne smeš podati parametrov v oklepaju, medtem ko če kličeš funkcijo, pa morajo biti parametri v oklepaju. Tu se lahko človek mimogrede zmoti, še posebej če programira večinoma v jezikih, ki tega ne ločujejo.

PS: Jst v VB-ju nisem aktivno programiral že več kot eno leto, tko da mi gre prow na živce, ko hočem dajat podpičja na konec vrstice...

Hvala, bo poizkusil...