Kniga-Online.club
» » » » Интернет-журнал "Домашняя лаборатория", 2007 №4 - Коллектив авторов

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

Читать бесплатно Интернет-журнал "Домашняя лаборатория", 2007 №4 - Коллектив авторов. Жанр: Газеты и журналы / Сделай сам / Хобби и ремесла год 2004. Так же читаем полные версии (весь текст) онлайн без регистрации и SMS на сайте kniga-online.club или прочесть краткое содержание, предисловие (аннотацию), описание и ознакомиться с отзывами (комментариями) о произведении.
Перейти на страницу:
���������� ������� RTF (Rich Text Format � ����������� ��������� ������). ������ RichTextBox ����������� ����� � ������� RTF � ��������� �������������� � ����������� ������ �� �������� �����.

� ����� ������ RichTextBox ����������� ���������� ������� DataSource � DataField. ��� ���� � ���� ������ ������� MS Access, � ������� ����������� ������ RichTextBox, ������ ���� Binary ��� Memo. ���� ������������ ������ ������, �� ���� ������ ���� ������� ������� (��������, ���� Text � ���� ������ Microsoft SQL Server).

�� ��������� RichTextBox ���������� �� ������ ������������ Visual Basic. �������� ��� � ������ ����� �������� ������� ���� Project->Components � ������� ����������� ��������� Microsoft Rich ������ Control � ���� �������� ���������� (Controls). ����� ����� �� ������ ������������ �������� ��� ����������� ~

�������� � ������� ���������� VisData ���� ������ RICH.MDB, ������������ ������� TEXTS ������� �������� ��� ���� Id (���� Integer) � Textl (���� Memo).

� ���������������� ���������� ������������ ����������� �������������� ������ ���������� ��������� ���������� ������� ������� RichTextBox: SelBold, Selltalic, SelUnderline � SelStrikeThru. ��������� ��������� ���� ������� ��������� � �������.

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

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

SelBold ∙ ���� ����������� True, �� ���������� ����� ������������ ���������� ������.

Selltalic ∙ ���� ����������� True, �� ���������� ����� ������������ ��������.

SelUnderline ∙ ���� ����������� True, �� ���������� ����� ��������������.

SelStrikeThru ∙ ���� ����������� True, �� ���������� ����� ���������������.

�������� ����� ������ � ����������� �� �������� ����� ������ ���������� �������, ��������� ����, ���������� ��������� ���� � ���� ��������� ������, ��� �������� �� ���.�9.3. ������� ��������� ���� �������� �������, ��� ������������ ����� ����� � ������� RTF.

���.�9.3. ������������ ��������� ���������� �� �������� �����

���������� �������� ������� ���������� ������� DataBaseName � RecordSource ��� �C: WORKRICH.MDB� � �Texts�, ��������������. �������� ��������� ��������, ������������� �� ����� ���������� ��������� �������:

Command1.Caption=����������

Command2.Caption=������

Command3.Caption=������������

Command4.Caption=�������������

Command5.Caption=��������

Text1.DataSource=Data1

Text1.DataField=Textl

RichTextBox1.DataSource=Data1

RichTextBox1.DataField=Text1

� ��������� ��������� ������� ������� ��������� ������ �������� ��������� ���:

Private Sub Command1_Click()

If RichTextBox1.SelBold = Fulse Then

������� RichTextBox1.SelBold = True

Else

������� RichTextBox1.SelBold = Fulse

End If

End Sub

Private Sub Command2_Click()

If RichTextBox1.Selltalic = Fulse Then

�������� RichTextBox1.Selltalic = True

Else

��������� RichTextBox1.Selltalic = Fulse

End If

End Sub

Private Sub Command3_Click()

If RichTextBoxl.SelUnderline = Fulse Then

��������� RichTextBox1.SelUnderline = True

Else

��������� RichTextBox1.SelUnderline = Fulse

End If

End Sub

Private Sub Command4_Click()

If RichTextBox1.SelStrikeThru = Fulse Then

��������� RichTextBox1.SelStrikeThru = True

Else

����������RichTextBox1.SelStrikeThru = Fulse

End If

Private Sub Command5_Click()

����������Data1.Recordset.AddNew

End Sub

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

��������� ������ ����� ���������� ������� �� ���.�9.4. �������� �������� �� ��, ��� � ������� ��������� ���� ������������ ���������� ������� RichTexBox.

���.�9.4. ��������� ������ ����������

���� 10

���������� Data Form Wizard ��� �������� �������� �������� ����

��� �������� �������� ����������, ��������������� ��� ������ � ������ ������, ����� ���� ����������� ������ ���� ������ (Data Form Wizard). ��� ��������� � ������ ������ � �������� �������� Visual Basic � �������� �� ���� Add-Ins (����������). ������, �� ���������, ������ ����� ���������� ���������� � ��������������� ������� ������� ������� �������� � ���� ��� ������ ��������� ���������� (Add-In Manager). ��������� ������� ���� Add-Ins->Add-In Manager, �������� ����������� ��������� VB Data Form Wizard � ���������� ���� ��������� ���������� � ����������� ��������� ����� �������� ������ ��. ������ ������ ���� ��������� �������� �� ���� Visual Basic.

� ������� ������� ���� ������ �� � ������������� ������ ����� ��������� �������� ����� ����������, �������� ��������� ���� ������ � ���������� ��������� ������, ����������� �� ����� ������ ���������� ������� � ��������� � ��� �������� ���������� Visual Basic. ������, ��� ��������� ��������� ���������� ����� ��������������� ������, ������������ � ��������������� ���� ���� ������. ���� �����������, �� ����� �������� �� ����� ��������� ������

Перейти на страницу:

Коллектив авторов читать все книги автора по порядку

Коллектив авторов - все книги автора в одном месте читать по порядку полные версии на сайте онлайн библиотеки kniga-online.club.


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

Отзывы читателей о книге Интернет-журнал "Домашняя лаборатория", 2007 №4, автор: Коллектив авторов. Читайте комментарии и мнения людей о произведении.


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

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

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


Прокомментировать
Подтвердите что вы не робот:*
Подтвердите что вы не робот:*