Dátum Porovnanie VBA

Porovnanie dáta vo VBA , alebo Visual Basic for Applications , je v podstate rovnaká operácia ako nákupný celých čísel . Ak chcete vykonať porovnanie dát jednoduchšie a zjednodušiť prácu s dátami všeobecne , používať názvy premenných , ktoré označujú " Date " typ . Napríklad , napísať " údajov1 , " alebo " birthday1 . " Ak chcete porozumieť tomu , ako porovnávať dáta , napísať krátke programy , ktoré vykonávajú dátum porovnaní , a použite režim krok - za - krokom spustenie programovacieho prostredia VBA , spolu s oknom na životné prostredie je " Quick hodinky " , pozorovať tie porovnanie v reálnom čase . Určenie typu

Nemusíte previesť dáta " Date " typu , pre porovnanie, ak sú už v tomto type . Môžete zistiť , či je premenná typu dátum v niekoľkých ohľadoch . Pozrite sa na sekciu deklaráciou na začiatku procedúry jazyka VBA . Táto sekcia je miesto , kde môžete deklarovať všetky premenné pomocou kľúčového slova " Dim " . Vaše dáta premenné budú deklarované vyhlásenia , ako je tento : " . Dim d1 as Termín " Ďalším spôsobom , ako zistiť , či je premenná " Date " typ je pri pohľade na zaradenie do premennej . Tieto úlohy bude používať znak " # " , ktoré označuje " Date " typ . Napríklad nasledujúci príkaz priraďuje dátum " 12.1.2001 " na " Date " premenná " D1 " .

D1 = # 01/12/2001 #
prevod do dátumu Typ

Ak chcete porovnať dáta vo VBA , musíte najprv mať dva termíny , ktoré sú uložené v " Dátum " typu , čo je jeden z niekoľkých typov hodnôt vo VBA . " Date " typ je špeciálny inštancie dátového typu celé číslo , takže porovnaním dát je v podstate rovnaký ako porovnávanie celých čísel . Ak vaše dáta nie sú zatiaľ v " Dátum " typu , budete musieť previesť na daný typ . Myslíte , že použitím funkcie CDATA . Napríklad , spustite nasledujúci príkaz previesť reťazec " 12.1.2001 " na typ dátum :

D1 = CDATA ( " 2001-12-01 " )

Porovnanie

Ak chcete otestovať , či dáta v jednom " Dátum " premenná sa vyskytuje pred inou , použite menej ako symbol , ako ukazuje nasledujúci príklad.

Ak je (d1 < d2)

Použite symbol väčšia ako vyskúšať či nastane deň neskôr , než iný dátum , a používajú sa rovná symbol , či sú hodnoty dvoch premenných odkazujú k rovnakému dátumu .
Vzorový program

Napíšte ukážkový program , ktorý prevádza a porovnáva dáta , takže môžete odkazovať na programe pri písaní zložitejších VBA programy vykonávajúce dátum porovnávanie . Otvorte programovacie prostredie v jednej z aplikácií balíka Office , kliknite na tlačidlo " Developer " kartu je " Visual Basic " , potom vložte nasledujúci program , do centra okna životného prostredia je . Tento program používa funkciu " CDATA " pre prevod reťazca na dáta , a plní tri rôzne porovnaní v dvoch termínoch . Spustite program stlačením tlačidla " F5 " a zobraziť jeho výkon tým , že hľadá v okne " bezprostrednej " .

Public Sub CompareDates ( )

Dim d1 , d2 Ako Dátum

d1 = CDATA ( " 2001-12-01 " )

d2 = CDATA ( " 2002-12-01 " )

( d1 < d2 ) Potom Debug.Print " Dátum 1 nastane skôr , než dátum 2. "

( d1 > d2 ) Potom Debug.Print " Dátum 1. nastane neskôr ako deň dva . "

( d1 = d2 ) Potom Debug . print " Dátum 1. je rovnaké ako dátum 2. . "

End Sub

• Predchádzajúca strana: Ako odstrániť zošit udalosť vo VBA 
• Ďalšia strana: Ako nainštalovať XNA pre použitie s VBnet