Стосується
|
Об’єкт ComboBox |
|
Об’єкт TextBox |
За допомогою властивості Format можна налаштувати відображення чисел, тексту, дат і значень часу на екрані та в друкованому вигляді. Рядок (читання й записування).
вираз.Format
expression — обов’язковий аргумент. Вираз, який повертає один з об'єктів у списку "Застосовується до".
Примітки
Ви можете використовувати попередньо визначені формати, а також створювати спеціальні формати за допомогою символів форматування.
Властивість Format приймає різні значення для різних типів даних.
Для елемента керування цю властивість можна встановити в вікно властивостей елемента керування . Для поля цю властивість можна встановити в режимі конструктора таблиці (у розділі Властивості поля) або в режимі конструктора вікно запиту (у вікні властивостей Властивості поля). Крім того, можна використовувати код макрос або Visual Basic for Applications (VBA).
Примітка.: У Visual Basic введіть рядковий вираз, який відповідає одному з попередньо визначених форматів, або введіть власний формат.
Властивість Format впливає лише на спосіб відображення даних. Це не впливає на те, як зберігаються дані.
Microsoft Office Access 2007 надає попередньо визначені формати для типів даних "Дата й час", "Числовий", "Грошовий", "Текст" і "Примітка" та "Так/Ні". Попередньо визначені формати залежать від країни або регіону, визначених подвійним клацанням регіональних параметрів у Windows Панель керування. У програмі Access відобразяться формати, які відповідають вибраній країні або регіону. Наприклад, якщо на вкладці Загальні вибрано англійську мову (Сполучені Штати), значення 1234,56 у грошовому форматі матиме вигляд 1234,56 $, але якщо на вкладці Загальні вибрано англійську (британську), число матиме вигляд 1234,56 фунтів стерлінгів.
Якщо налаштувати властивість Format у режимі конструктора таблиці, Access використовуватиме цей формат для відображення даних у табличному поданні. Властивість Format цього поля також застосовуватиметься до нових елементів керування у формах і звітах.
У спеціальних форматах для будь-якого типу даних можна використовувати такі символи:
|
Символ |
Значення |
|
(пробіл) |
Пробіли відображаються як літерали. |
|
"АБВ" |
Будь-який текст у лапках відображається як літерали. |
|
! |
Замість вирівнювання за правим краєм застосовується вирівнювання за лівим краєм. |
|
* |
Вільне місце заповнюється наступним символом. |
|
\ |
Наступний символ відображається як літерал. Щоб відобразити символи як літерали, можна також узяти їх у лапки. |
|
[колір] |
До форматованих даних застосовується колір, зазначений у дужках. Доступні кольори: чорний, синій, зелений, блакитний, червоний, малиновий, жовтий, білий. |
Символи форматування для типів даних "Числовий" і "Грошова одиниця" не можна поєднувати із символами форматування для типів даних "Дата й час", "Так/Ні", "Текст" і Memo.
Якщо визначити маска вводу та встановити властивість Format для тих самих даних, властивість Format має вищий пріоритет, якщо дані відображаються, а маска вводу ігнорується. Наприклад, якщо створити маску вводу Пароль у режимі конструктора таблиці, а також установити властивість Формат для того самого поля (у таблиці або елементі керування на формі), маска вводу Пароль ігнорується, а дані відображаються відповідно до властивості Формат .
Приклади
На трьох прикладах нижче продемонстровано налаштування властивості Format за допомогою попередньо визначених форматів:
Me!Date.Format = "Medium Date"
Me!Time.Format = "Long Time"
Me!Registered.Format = "Yes/No"
У прикладі нижче для налаштування властивості Format використовується спеціальний формат. Дата в цьому форматі має такий вигляд: Січ 1995.
Forms!Employees!HireDate.Format = "mmm yyyy"
Нижче наведено зразок функції VBA, що форматує числові дані за допомогою формату грошової одиниці та форматує текстові дані, перетворюючи всі літери на великі. Виклик функції здійснюється з події OnLostFocus вільного елемента керування з іменем 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
