Интернет-журнал "Домашняя лаборатория", 2007 №4 - Чернованова
Шрифт:
Интервал:
Закладка:
��������� � ������� ����������� ��������� (Check box) ����� ������������ ��� ���������� ������������� �� �������� ����� ���������� �� ����� ���� ������ ����������� ���� (�� ��� ���, 1 ��� 0, True ��� False). ��������� ����� ������ ����� �������: ������� ��� �� ������� ���� � ��� ���������� ������� ���������� �������, ���� ����� �� ������ ��� ��� � ��� ������������� ���������� ���������, ���������� ���������� ��� ��� � � ������� ������ � ������������ (���.�7.3) � �.��. �� 17 ������ ������������ Visual Basic ����������� ��������� ��������� ������������ . ����� ������������ ���������� � �������� ���������� ������� �������������� ���������� ������� DataSource � DataField.
���.�7.3. ������ ������������� ������������ ����������
MaskedEdit��������, ��� ������������ ����� ��������� ������ ��� ����� ���������� � ���� ������. �������, �� ��������� ���� ���, ��� ������ �� ������. ���������� ��������� �������� ��� ��������� ������������� ��������� ������������� ��� ����� ����������� ���������� ���� �������������� � ������ (MaskedEdit) ���� ������� ���������� ��������� ��� �� �������� � ���� ����� ������� ��������. �������� ����� ���������� ����� ��������� ����� �������� ��� �������� ������. �������� ����� �������� ����� ��������� ������, ��� ������ � ������ �������� ��������� ��������, � ������ # ���������� ����� �����:
(###)###-##-##
�������� ������ ������� �� ����� ���� � �� ������ ��������� ���� ��� ������ ��������.
���� �������������� � ������ ����� �������� Mask (�����), ������� ��������� ���������� ������ ������������ ������ � ���� �����. �� ��������� �������� Mask �� ���������� � ��������� ������� Mask ��������� ���������� �������� ���������� ����. �������, ������� ������������ � �������� ����� ��������� � �������.
�������. �������, ������������ � �������� �����
������ -���������
# - ����� �����
∙�- ���������� ����� (��������, 3.1415),
,�- ����������� ����� (��������, 1,000,000)
: - ����������� ������� (��������, 21:30)
/ - ����������� ���� (��������, 05/08/97)
& - ����� ������
A�- ����� ����� ��� �����
?�- ����� �����
� ����� ���� ������ ������ MaskedEdit ����������� ���������� ������� DataSource � DataField.
�������� ������� ���������� � ������� ����� ����������� ����������� ������������� � ���� ������� ��������� ��������� ����������. ��������, ��������, ��� ������ ���������� VisData ��� MS Access ���� ������ CUSTOMER.MDB � ����� �������� CUSTOMERS, � ������� ����� ������� ���������� � �����������. ����� ��� ������� ����� ��������� ��������� ����:
��� ��� ���� ���������� ����� ������� ���������� ��������� ����������� ���� ������, �� �������������� �������� � ������� CUSTOMERS ��������� ������������ �������.
�������� ����� ������ � ����������� �� ����� ������ ���������� �������, ���� �����, ���� ��������� ����, ���� �������������� � ������ � ���� ����������� ���������, ��� �������� �� ���.�7.4.
���.�7.4. ������������ ��������� ���������� �� �������� �����
������ � ���� ������� ������� Data1 ���������� �������� Caption, ��� �����������, ���������� �������� DatabaseName ��� ��� ����� ���� ������ � ��������� ������� ���� C: WORK CUSTOMER.MDB � ������� ��� ������� Customers � �������� ��������� ������ RecordSource.
����� ���������� �������� �����, ��������� ����, ���� �������������� � ������ � ������������ ���������� ��������� �������:
L���l1.���tion=���
L���l2.���tion=�������
L���l3.���tion=�����������
L���l4.���tion=�����
L���l5.���tion=�������
L���l6.���tion=����������
Text1.DataSource=Data1
Text1.DataField=Name
Text2.DataSource=Data1
Text2.DataField=LastName
Text3.DataSource=Data1
Text3.DataField=Concern
Text4.DataSource=Data1
Text4.DataField=Address
Text5.DataSource=Data1
Text5.DataField=Note
MaskedEdit1.DataSource=Data1
MaskedEdit1.DataField=Phone
MaskedEdit1.Mask=(###)###-##-##
Check1.Caption=���������� ����������
Check1.DataSource=Data1
Check1.DataField=Const
����� Label7 ����� ������������ ���������� ���������� ����, � ������� ������������ ���������� ���� Note (����������). ��� ����� ���������� ��������� ��������:
Label6.DataSource=Data1
Label6.DataField=Note
������ ��������� � ��������� ������. ��������� ������ ���������� ������� �� ���.�7.5.
���.�7.5. ��������� ������ ����������
Image � Picture box��� ����������� �� ����� ����������� �������� � ������� Windows (������� ����� � ����� � ����������� BMP, ����� � ICO � ��������� � WMF), � ����� �������� � �������� GIF � JPG ����� ������������ �������� ���������� Image (�����������) � Picture Box (����������� ����). ����������� ��� ������� ���������� � ����� ������ ���������� ��� ��� �� ������� DataSource � DataField � �� ������ ������������ Visual Basic ���������� ������������� �� ���������������.
���� ��� �������� ���������� � ������ ����� ����, ���