Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
 deklarovať novú funkciu pod hlavný podsystém . Nezabudnite nepoužívať " SUB " typ modulu , pretože iba funkcie vracať hodnoty . 
 2 
 deklarovať funkciu s jedným parametrom s názvom " Number . " To bude odkazovať hodnotou . 
 
 3 
 deklarovať štyri premenné : jeden reťazec a tri celé čísla . Tri celé čísla budú použité držať hodnoty počtu , ktorý bude skenovaný 
 4 
 Inicializácia každej z troch celých čísel k hodnotám : . S.Substring ( 0,2 ) , S.Substring ( 2,2 ) a S.Substring ( 4,4 ) , bude to predstavovať mesiac , deň a rok, resp . 
 5 
 Nastavte hodnoty pre vrátenie odovzdané späť do menami celočíselných premenných . Napríklad : " Vráť Opravil dátum ( mesiac, deň , rok ) . 
 6 
 previesť každú samostatnú číslo na reťazec pomocou jednoduchého obsadenie výraz . Napríklad , bude CStr ( mesiac ) previesť mesiac na reťazec ekvivalent . Tieto hodnoty môžu byť prezentované priamo alebo použité ako indexy pre pole zobraziť názvy ako " v decembri . "