Folosirea funcției Format pentru a formata o expresie

Funcția Format este un instrument puternic de modificare numere, date și timp, șiruri de caractere în formatul dorit.

Sintaxa pentru funcția Format este:

Format(expression[, format[, firstdayofweek[, firstweekofyear]]])

Iată componentele sintaxei:

  • expression este orice expresie validă.
  • format este un argument opțional care specifică denumirea expresiei de format sau expresia de format definită de utilizator. Descrierea detaliată – mai jos.
  • firstdayofweek este o constantă opțională care specifică ziua cu care începe săptămâna (pentru informare): Setarea implicită este vbSunday (1), dar se poate alege și vbMonday (2), vbTuesday (3), vbWednesday (4), vbThursday (5), vbFriday (6), vbSaturday (7), sau vb UseSystem (0; folosește setările din sistem).
  • firstweekofyear este o constantă opțională care specifică săptămâna considerată prima din an (pentru informare).

Pot fi definite formate proprii pentru funcția Format, în cazul în care niciunul din formatele descrise mai jos nu îndeplinește anumite cerințe.

Folosirea de formate numerice predefinite

Tabelul următor afișează formatele numerice predefinite care pot fi folosite cu funcția Format.

De exemplu, comanda următoare returnează $123.45:

Format("12345", "Currency")        

Crearea unui format numeric

Dacă niciun format numeric predefinit nu îndeplinește anumite cerințe, se pot creea formate proprii folosind combinațiile de caractere folosite la crearea propriilor formate numerice, din tabelul următor.

De exemplu, următoarea declarație returnează moneda formatată cu patru zecimale:

Format("123456", "$00.0000")

Crearea formatului pentru dată sau timp

Similar, pot fi create formate proprii pentru dată și timp prin amestecarea caracterelor din tabelul de mai jos.

Crearea unui format pentru șiruri de caractere

Funcția Format permite crearea de șiruri de caractere particularizate folosind opțiunile din tabelul următor.

De exemplu, instrucțiunea următoare atribuie variabilei strUser un șir de caractere format din patru spații dacă nu s-a introdus nimic în acel câmp:

strUser = Format(InputBox("Introduceti numele:"), "@@@@")