Već smo razmotrili što su varijable, tipovi podataka i konstante u našem vodiču VBA tipovi podataka - varijable i konstante. U ovom ćemo vodiču pokriti kako proglasiti varijablu kao datum.
U VBA, tip podataka datuma pohranjen je kao decimalni broj. U ovu vrstu podataka mogu se pohraniti i datumi i vrijeme. Tip podataka datuma VBA može pohraniti vrijednosti u rasponu od 1. siječnja 100. do 31. prosinca 9999. godine.
VBA varijabla datuma
Deklarirate varijablu kao datum pomoću ključne riječi Dim:
1 | Dim dateOne kao Date |
Tada varijabli datuma možete dodijeliti datum. Postoji više načina za generiranje datuma za dodjeljivanje varijablama:
Dodijeli danas varijabli
Funkcija datuma vratit će današnji datum:
123 | Dim dtDanasdtToday = Datum |
Dodijeli sada varijabli
Funkcija Now vraća današnji datum i trenutno vrijeme:
123 | Dim dNowdNow = Sada |
Dodijelite vrijeme varijabli
Funkcija vremena vratit će trenutno vrijeme:
123 | Dim tTimetTime = Vrijeme |
Dodijelite datum varijabli pomoću DateSerial
Funkcija DateSerial vratit će datum na temelju unesene godine, mjeseca i dana:
123 | Dim dsDatedsDate = DateSerial (2010, 11, 11) |
Dodijelite vrijeme varijabli pomoću TimeSerial -a
Funkcija TimeSerial vratit će vrijeme, na temelju ulaznih sati, minuta i sekundi:
123 | Dim tsTimetsTime = TimeSerial (10, 10, 45) |
Morate priložiti datume sa # ili ”kada ih koristite u svom kodu, kao što je prikazano u nastavku:
VBA DateValue funkcija
Funkcija VBA DateValue može se koristiti za inicijalizaciju datuma. Sljedeći kôd može se koristiti za inicijalizaciju datuma u VBA:
1 | MsgBox DateValue ("1/1/2010") |
VBA TimeValue funkcija
1 | MsgBox TimeValue ("21:30:57") |
Primjer varijable datuma Excel VBA
Ovaj postupak pokazuje kako stvoriti varijable datuma, dodijeliti im vrijednosti i ispisati ih na radni list programa Excel:
12345678910111213 | Poddeklariranje AVariableAsADate ()Dim dateOne As DateDim dateTwo As DatedateOne = #1/1/2019 #dateTwo = "1/2/2019"Raspon ("A1"). Vrijednost = datum jedanRaspon ("A2"). Vrijednost = datumDvaKraj podm |
Rezultat je:
U ovom vodiču možete saznati više o funkcijama datuma.
VBA varijabla datuma u pristupu
Varijabla datuma radi potpuno isto u Access VBA kao i u Excel VBA.
Ovaj postupak pokazuje kako stvoriti varijablu datuma i ažurirati polje u pristupnoj tablici s vrijednošću.
12345 | Poddeklariranje AVariableAsADate ()Dim dtWork As DatedtWork = #05/10/2020 #DoCmd.RunSql "UPDATE tblJobs SET WorkDate = #" & dtWork & " # WHERE JobNo = 6"Kraj podm |