Se aplică la
Obiectul ComboBox |
---|
Obiectul TextBox |
Puteți utiliza proprietatea Format pentru a particulariza modul în care sunt afișate și imprimate numerele, datele, orele și textul. Șir de caractere în citire/scriere.
expresie.Format
expresie Obligatoriu. O expresie care returnează unul dintre obiectele din lista Se aplică la.
Observații
Puteți utiliza unul dintre formatele predefinite sau puteți crea un format particularizat utilizând simbolurile de formatare.
Proprietatea Format utilizează setări diferite pentru tipuri diferite de date.
Pentru un control, puteți seta această proprietate în foaie de proprietăți controlului . Pentru un câmp, puteți seta această proprietate în Vizualizarea proiect a tabelului (în secțiunea Proprietăți câmp) sau în Vizualizarea proiect a fereastra Interogare (în foaia de proprietăți Proprietăți câmp). De asemenea, puteți utiliza un macrocomandă sau cod Visual Basic for Applications (VBA).
Notă: În Visual Basic, introduceți o expresie șir care corespunde unuia dintre formatele predefinite sau introduceți un format particularizat.
Proprietatea Format afectează modul în care se afișează datele. Aceasta nu afectează modul în care sunt stocate datele.
Access furnizează formate predefinite pentru tipurile de date Dată/Oră, Număr și Monedă, Text și Memo și Da/Nu. Formatele predefinite depind de țara/regiunea specificată făcând dublu clic pe Opțiuni regionale în Panoul de control Windows. Access afișează formatele potrivite pentru țara/regiunea selectată. De exemplu, cu limba Engleză (Statele Unite) selectată pe fila General, 1234.56 în formatul Monedă apare ca $1,234.56, dar atunci când s-a selectat Engleză (Regatul Unit) pe fila General, numărul apare ca £1,234.56.
Dacă setați proprietatea Format a unui câmp în vizualizarea Proiectare tabel, Access utilizează acel format pentru a afișa datele în foile de date. În plus, aplică proprietatea Format a câmpului la noile controale din formulare și rapoarte.
Puteți utiliza următoarele simboluri în formatele particularizate pentru orice tip da date.
Simbol |
Semnificație |
---|---|
(spațiu) |
Afișați spațiile drept caractere literale. |
„ABC” |
Afișați orice conținut dintre ghilimele drept caractere literale. |
! |
Impuneți alinierea la stânga în locul alinierii la dreapta. |
* |
Completați spațiul disponibil cu caracterul următor. |
\ |
Afișați caracterul următor drept caracter literal. De asemenea, puteți afișa caractere literale plasând ghilimele în jurul lor. |
[culoare] |
Afișează datele formatate în culoarea specificată între paranteze. Culorile disponibile: Negru, albastru, verde, bleu, roșu, fucsia, galben, alb. |
Nu puteți amesteca simbolurile de formatare particularizată pentru tipurile de date Număr și Monedă cu simbolurile de formatare Dată/Oră, Da/Nu sau Text și Memo.
Când ați definit o mască de intrare și setați proprietatea Format pentru aceleași date, proprietatea Format are prioritate atunci când se afișează datele și masca de intrare este ignorată. De exemplu, dacă creați o mască de intrare Parolă în vizualizarea Proiectare tabel și setați proprietatea Format pentru același câmp, fie în tabel, fie într-un control dintr-un formular, masca de intrare Parolă este ignorată, iar datele se afișează conform proprietății Format.
Exemplu
Următoarele trei exemple setează proprietatea Format utilizând un format predefinit:
Me!Date.Format = "Medium Date"
Me!Time.Format = "Long Time"
Me!Registered.Format = "Yes/No"
Următorul exemplu setează proprietatea Format utilizând un format particularizat. Acest format afișează o dată ca: Ian 1995.
Forms!Employees!HireDate.Format = "mmm yyyy"
Următorul exemplu demonstrează o funcție VBA care formatează date numerice utilizând formatul Monedă și formatează datele text complet cu majuscule. Funcția este apelată din evenimentul OnLostFocus al un control nelegat numit TaxRefund.
Function FormatValue() As Integer
Dim varEnteredValue As Variant
varEnteredValue = Forms!Survey!TaxRefund.Value
If IsNumeric(varEnteredValue) = True Then
Forms!Survey!TaxRefund.Format = "Currency"
Else
Forms!Survey!TaxRefund.Format = ">"
End If
End Function