Ako Date Stamp záznamu v programe Access

Lisovanie záznam databázovej tabuľky v programe Microsoft Access zahŕňa zadanie užívateľského zvolený dátum v zázname . Užívateľ môže zadať dátum ručne alebo pomocou jazyka Visual Basic for Applications automaticky pečiatkou dátumu . Veci , ktoré budete potrebovať v Microsoft Access
Zobraziť ďalšie inštrukcie Cestuj 1

Otvorte aplikáciu Microsoft Access a vytvoriť ukážkovú databázu kliknutím na " Súbor > Šablóny Nový > Ukážka > Udalosti , " a potom " Vytvoriť " tlačidlo . Kliknite na " navigačné tabla " v ľavej časti obrazovky , potom " Podporné objekty " , mieri k odhaleniu " Udalosti " na ikonu tabuľky . Poklepaním na túto ikonu sa otvorí tabuľku udalostí pre zadávanie dát .
2

Zadajte dva riadky ukážkových dát v tabuľke udalostiach pomocou nasledujúci text , ktorý zodpovedá poli " Názov" , " Start Time " a " End Time " . Nevstupujte čiarky , ktoré vám ukážu , kde stlačte klávesu " Tab " . Do nahradiť poľa s dnešné a zajtrajšie dáta .

Kosenie trávy , , Maľovanie domu , ,
3

Začnite programovania potrebné , aby sa automaticky pečiatka Štart čas tým , že najprv vytvoríte formulár , na ktorom bude program spustený : " . Create > formulár " stlačte Pravým - kliknite na záložku novej " Event " forme a zvoľte " v návrhovom zobrazení . "
4

Stlačte tlačidlo " Povoliť obsah " tlačidlo na paneli nástrojov umožňuje spustenie makier v tejto databáze .

5

Pravým - kliknite na " Date Stamp " pole a zvoľte " Vlastnosti " , potom kliknite na " udalosti " záložku v okne " vlastností " . Kliknite na šípku nadol v riadku " On Got ostrenie " a vyberte položku " [ Event Procedure ] . " Kliknite na tlačidlo s elipsy , ktoré bezprostredne sedí na pravej strane sa šípkou dolu , vstúpte do jazyka integrované vývojové prostredie ( IDE ) .
6

Vložte nasledujúci kód programu v IDE kóde okno :

Private Sub Start_Time_GotFocus ( ) Dim x As VariantIf ( IsNull ( start_time ) ) then = Month ( Now ( ) ) d = deň ( Now ( ) ) y = Year ( Now ( ) ) x = m & " /" & d & " /" & yStart_Time = xEnd IfEnd Sub
7

Späť na prístup stlačením "alt - f11 , " kliknite pravým tlačidlom myši na záložku " Udalosti " a vyberte " formulárové zobrazenie " aktivovať formulár pre zadávanie dát .
8

Tab vo všetkých oblastiach každej vzorky záznamu , ktorý ste zadali do " ID " pole zobrazuje " ( nový ) . " Karta sa do poľa " Start Time " pole a všimnúť účinok makrá , ktorá vypĺňa Štart čase s aktuálnym dátumom .
9

Dátum pečiatka " End Time " re- vstupu do IDE a vložiť nasledujúci kód pod kódu , ktorý skôr zadané : klipart

Private Sub End_Time_GotFocus ( ) " Zmena 1 v ďalšom vyhlásení na požadovaný počet dní po začatí datetm = DateAdd ( " d " , 1 , start_time ) end_time = tmEnd Sub
10

Re - run forma , zabezpečiť , aby pole " End Time " sa zobrazí dátum , deň potom , čo na poli " Štart time " .

• Predchádzajúca strana: Ako sa zbaviť nulami v programe Access otázku 
• Ďalšia strana: Ako vytvoriť plán s dátumom poľa v programe Access