Интернет-журнал "Домашняя лаборатория", 2007 №3 - Вудворт

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

Назад 1 ... 215 216 217 218 219 ... 375 Вперед

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

�� ? � ��-�� "��" �� , �� "��2.doc", �� Word (��.�3.8).

��.�3.8. �� "��" ��, ��

�� Rtf, �� ".doc"! �� , � �� ".rtf".

��, � �� , �� ? �� "Docl.doc" (��, �� "Doc2.doc", "Doc3.doc"�� ). �� ? �� F3 � Explorere � ��, �� , �� -�� Word �� [3].

��, �� (�� , �� "FileName" �� ) �� (�� , �� -�� ) � � �� . �� .

�� ? �� , �� Rtf! � ��-�� -�� . �� , � �� "ActiveDocument", �� (��.�3.9) � ��, �� "Name".

��.�3.9. � �� .

��, �� , �� . ��. �� :

Sub experience2()

MsgBox ActiveDocument.Name

End Sub

�� "ActiveDocument.Name". �� "Debug.PrintActiveDocument.Name", �� (�� VBA "��"-"�� "). �� -�� . ��, �� F5� �� : "��1.doc".

�� , �� ! �� ? ��, �� ".doc". �� ?

�� . �� F1 � �� VBA, � �� "��", � �� "�� ",�� , � �� "��" �� , �� VBA.

�� "��". �� VBA �� , �� "�� " (�� , �� , �� ). �� "Left" (��.�3.10).

��.�3.10. �� Left.

�� "Left" �� , �� . �� ? �� , �� "�� "�� "Len". �� "��. ��", �� "�� Len" � �� [4].

�� , �� , �� :

imyadoc = Left(ActiveDocument.Name, Len(ActiveDocument.Name) � 4)

�� . �� :

Sub experience3()

imyadoc = Left(ActiveDocument.Name, Len(ActiveDocument.Name) � 4)

MsgBox imyadoc End Sub

� �� . � �� . �� , �� .

�� 

�� , �� . �� , �� Word,�� Word 6.0 � Word 95 �� , � ��, � VBA �� . �� VBA, �� Word 6.0 � Word 95 �� Office. �� Office 97/2000/�� , �� Office, �� VBA � �� WordBasic, �� Word 6.0 � Word 95.

� Word 6.0 � Word 95 �� "FileNameInfo$(��, ��)", � �� , �� . �� , �� , �� , �� 4. (�� WordBasic �� Microsoft