KnigkinDom.org» » »📕 Интернет-журнал "Домашняя лаборатория", 2007 №4 - Тен

Интернет-журнал "Домашняя лаборатория", 2007 №4 - Тен

Книгу Интернет-журнал "Домашняя лаборатория", 2007 №4 - Тен читаем онлайн бесплатно полную версию! Чтобы начать читать не надо регистрации. Напомним, что читать онлайн вы можете не только на компьютере, но и на андроид (Android), iPhone и iPad. Приятного чтения!

1 ... 197 198 199 200 201 202 203 204 205 206
Перейти на страницу:

Шрифт:

-
+

Интервал:

-
+

Закладка:

Сделать
��� ����������� ������ ��������� �� ����� �������.

���������� �������� �����, ��������� ����, ������ � ���������������� ���� ��������� �������:

Label1.Caption=���

Label2.Caption=�������

Label3.Caption=������������� ����� ������

Label4.Caption=���������� ����� ������

Text1.DataSource=Data1

Text1.DataField=Name

Text2.DataSource=Data1

Text2.DataField=LastName

Text3.DataSource=Data1

Text3.DataField= Idwork

DBList1.RowSource=Data2

DBList1.ListField=Office

DBList1.DataSource=Data1

DBList1.DataField=Id_work

DBList1.BoundColumn=ID_work

DBCombo1.RowSource=Data2

DBCombo1.ListField=Office

DBCombo1.DataSource=Data1

DBCombo1.DataField= Idwork

DBCombo1.BoundColumn=ID_work

��������� � ��������� ������ (���.�8.12). � ��������� ��������� ����� �� �������� ����� ����� ������������ ���������� ����� Name, LastName � Id work �� ������� PERSON. ������ � ��������������� ���� ���������� ���������� ���� ������ �� ������� WORKPLACE, ������ ����� ������ ��������, ������������� ���������� ��������� ����, ����� �������� � ������ ����������. ������������ �� ������ ������� � ������� ������� ������� ���������� ������� ���������� ��������� �� ������, ��� �� ������ �������� ����� ������. �� ������ ��� ���������������� ���� �������� ��������� �������� � ������� �����-���� ������ �� ������ ������� ���������� �������, ����� ����������� ��������� ������� ������ � ���������� ���������� ������. ������ ������� ��������� �� �� �� ������ � ��������� ��� ���������� � ����� ������ �������� � ������������ �� ��������� �������.

���.�8.12. ��������� ������ ����������

���� 9

����� (MSFIexGrid) � ���������� ��������� ���� (RichTextBox)

MSFIexGrid

ActiveX ������ MSFIexGrid ����� ����������� ��� ����������� �� �������� ����� ������, �������������� � ��������� ����. ���� ����� MSFIexGrid ������� � ����� ������, �� ������ ������������ � ������ ������ ��� ������. ��� ������, ��� �� ������ ��������� �������� ��� ���������� ����� �������, ��������, ��������, ���������, ���������, ������� �����, ����� ����������� � ������, �� �� ������ �������� ������ � ���� ������. ��� ��������� ����� ����� MSFIexGrid � ������� ������������ �������� DataSource, ������� ������������ ��� ��� ���������������� ������� ���������� �������.

����� �������� ������ MSFIexGrid �� ������ ������������, ��������� ������� ���� Project � > Components � �������� �� ������ ��������� ���������� (Controls) Microsoft FlexGrid Control � ����� ������� ������ ��.

����� ����� �� ������ ������������ �������� ����� ����������� -.

�������� Row � Col ������� MSFIexGrid ���������� ��������� ������� ������. ���������� ������� ������ �������� ����� �������� Text, �� ���� ������ � ������� �������� � ��������� ����. ���� ���� �� ���������� ����� ������, ��� ��� � Visual Basic ���� ������� �������������� ������ � ����� � �������. ���� � ������ ��������� ������� �����, �� ���������� ������������ ������� �������������� ����� � ������ CStr, ��������:

MSFlexGrid1.Text=CStr(sum).

� ������ �������, ��� ���������� ����� �� ���������� ����������� ������ ����� ������������ ������� Val, ��������:

sum=sum + Val(MSFlexGrid1.�ext)

�������� Rows � Cols ��������� ���������� ���������� ����� � �������� � �����. ������� ���������� � ����� � �������� ����� ���������� � ������� ������� FixedRows � FixedCols. ���������� ���������� ������������ ��������� FormatString. ��������, ��������� ������ ����������, ��� ���������� ��������� �������� �����:

s$ = "<��� ������ |<���� ���.|<��� �����.|>���-�� |<��������. ������|<���� "

MSFlexGrid1.FormatString = s$

��������� ����� ����� ������������ ����������� �������, ������ � ������ ������ ���������� ��������� ������ ������ � �������, ������� ������ �����, ��� ��� ������ ��������� �����:

s$ = ���|�����|�������"

MSFlexGridl1.FormatString = s$

�������� ��� ���������� ���������� ������������ ������ ��������� �������� TextArray. ��� �������� ����� ���������:

MSFlexGrid1.TextArray(cellindex) [= string]

��� string � ��������� ���������� ������, ������������ ���������� cellindex. �������� cellindex ������������ ����� ������ ������ � ����� � �������������� ��������� �������. � ������ ������� ������������ ������ ������������ ������������ �� ������ ������ �� ����� ���������� ������� � �����, ������������ ��������� Cols. ��� ������� ��������� cellindex ������ ������������ ��������� �������:

Function GetCellIndex(row As Integer, col As Integer) As Long GetCellIndex = row*MSFlexGrid1.Cols + col End Function

��� ��������� �� �������� � ��������� ������� MSFIexGrid ������� �������, ��� ������ ����� � ������� ������� �� � �������, � � ����. ����� �������, ������ ������ �����, � ������� ������ ��������� ���������, �� ����� ���� �������� ������� �������.

��� ������������ ������������� ������� MSFlexGrid �������� ����������, ��������������� ��� ��������� ����� ���� ������, ���������� ���������� � �����������, ��������� ��� ������� � �������.

���� ������ CASTOMER.MDB �������� � ���� ��� �������:

CASTOMER � �������� ���������� � �����������,

ORDERSALES � �������� ���������� � ��������� ��� �������,

PRODUCTS � �������� ����������� � �������.

��������� ������ ���� ������ �������� � ��������� ��������.

�������. ��������� ������� CASTOMER

���� ∙ ��������

Idcust ∙ ���

1 ... 197 198 199 200 201 202 203 204 205 206
Перейти на страницу:
Отзывы - 0

Прочитали книгу? Предлагаем вам поделится своим отзывом от прочитанного(прослушанного)! Ваш отзыв будет полезен читателям, которые еще только собираются познакомиться с произведением.


Уважаемые читатели, слушатели и просто посетители нашей библиотеки! Просим Вас придерживаться определенных правил при комментировании литературных произведений.

  • 1. Просьба отказаться от дискриминационных высказываний. Мы защищаем право наших читателей свободно выражать свою точку зрения. Вместе с тем мы не терпим агрессии. На сайте запрещено оставлять комментарий, который содержит унизительные высказывания или призывы к насилию по отношению к отдельным лицам или группам людей на основании их расы, этнического происхождения, вероисповедания, недееспособности, пола, возраста, статуса ветерана, касты или сексуальной ориентации.
  • 2. Просьба отказаться от оскорблений, угроз и запугиваний.
  • 3. Просьба отказаться от нецензурной лексики.
  • 4. Просьба вести себя максимально корректно как по отношению к авторам, так и по отношению к другим читателям и их комментариям.

Надеемся на Ваше понимание и благоразумие. С уважением, администратор knigkindom.ru.


Партнер

Новые отзывы

  1. Гость Татьяна Гость Татьяна30 май 15:03 Сказка. А потом ускочет мальчик,а тётенька будет воспитывать сынка-внучка по новой тянуть лямку. ... Друг сына - Мария Зайцева
  2. Гость Вера Гость Вера25 май 10:38 Я давно и безнадежно влюблена в эту  серию книг... Королевская кровь. Стальные небеса - Ирина Котова
  3. Гость Марина Гость Марина23 май 13:22 Очень жаль, что не закончена книга. Мне очень понравилась ... Вахтовик - Владимир Мухин
Все комметарии
Новое в блоге