Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Kliknite na záložku " Vytvoriť " v programe Access a zvoľte " Návrh formulára . " Program vytvorí nový formulár . Vyberte ovládacie tlačidlá " " pod " Controls " panelu a presuňte kurzor myši na novej podobe . Kliknite ľavým tlačidlom myši a vytvoriť nové tlačidlo . Pridať " zoznamu " riadenie do formulára rovnakým spôsobom ste pridali tlačidlá .
2
Pravým tlačidlom myši na pole so zoznamom a vyberte " Vlastnosti " . Na " vlastností " kliknite na záložku " Data " a vyberte rozbaľovací zoznam na " Typ zdroja riadkov " a vyberte " Zoznam hodnôt . "
3
Kliknite pravým tlačidlom myši na tlačidlo Nový a vyberte " Vlastnosti " . Na " Hárok vlastností " , kliknite na záložku " udalostí " a vyberte roletového menu na " On Kliknite na " a vyberte položku " [ Event Procedure ] . " Kliknite na výpustka ( ... ) a nový Microsoft Visual Basic sa otvorí okno
4
Zadajte nasledujúci príkaz : .
Dim dbs ako databáza
Dim rst Ako Recordset
Dim X As Integer
Dim strSQL As String Dim
lastFirst As String
deklarovať premenné , ktoré budete používať .
5
Typ : .
Set DBS = CurrentDb
nastaviť aktuálnu databázu
Typ :
strSQL = " CREATE TABLE Table1 ( Jmeno TEXT ( 25 ) , priezvisko TEXT ( 25 ) ) ; . "
DoCmd.RunSQL ( strSQL )
na vytvorenie novej tabuľky v databáze s názvom " Tabuľka 1 "
6
Typ :
strSQL = " INSERT INTO Tabuľka 1 ( [ Meno ] , [ Priezvisko ] ) "
strSQL = strSQL & " VALUES ( ' John ' , ' Smith ' ) . "
DoCmd.SetWarnings False
DoCmd.RunSQL ( strSQL )
vložte prvý riadok údajov
7
Typ :
strSQL = " INSERT INTO Tabuľka 1 ( [ Meno ] , [ Priezvisko ] ) "
strSQL = strSQL & " VALUES ( ' Jaime ' , ' Avelar ' ) ; "
< . p > DoCmd.SetWarnings False
DoCmd.RunSQL ( strSQL )
vložiť druhý riadok dát
8
Typ :
set rst = dbs.OpenRecordset ( "Tabuľka 1 " )
nastaviť rekord
Typ : .
rst.MoveFirst
X = 0 Ak chcete rst.RecordCount - 1
lastFirst = Trim ( . rst.Fields ( " LastName " ) Value ) & " " & Trim ( rst.Fields ( " . Jmeno " ) Value )
List1.AddItem lastFirst
rst.MoveNext
Ďalšie X
na priechodná záznamy , ktoré ste práve vytvorili a zobrazovať ich v zozname na formulári .
9
Typ :
MsgBox " Vy ste zobrazené všetky záznamy vo Table1 na zozname úspešne ! " , vbInformation
sa zobrazí správa . Prepnite späť do okna programu Access 2007 a kliknite na tlačidlo " View " pre spustenie formulára . Kliknite na tlačidlo " Command0 " a uvidíte ovládací prvok zoznam zobrazujúci názvy .