База ответов ИНТУИТ

Основы офисного программирования и документы Word

<<- Назад к вопросам

В данном примере:Public TextBuffer As String:

(Отметьте один правильный вариант ответа.)

Варианты ответа
текстовый буфер задается обычной строкой(Верный ответ)
макрос копирует выделенный текст в буфер
текст из буфера вставляется в точку, заданную курсором
Похожие вопросы
В данном примере:
Public Sub CopyText()	TextBuffer = Selection.TextEnd Sub
В данном примере:
Public Function ExistRef(Name As String, Refery As Object) As Boolean	'Определяет наличие ссылки с именем Name в коллекции References	'Возвращает ссылку при ее обнаружении	Dim MyRef As Object	Set Refery = Nothing	ExistRef = False	For Each MyRef In ActiveDocument.VBProject.References		If MyRef.Name = Name Then			Set Refery = MyRef			ExistRef = True			Exit For		End If	Next MyRefEnd Function
параметр - MyRef является выходным и задает:
В данном примере:
Public Sub RemoveRef()	'Удаление ссылки на проект с именем NoP	Dim MyRef As Object	Dim NameOfProject As String	Dim NameOfFile As String	'Выбор удаляемого проекта	 Call ChooseProject(NameOfFile, NameOfProject)	'Удаление ссылки	If ExistRef(NameOfProject, MyRef) Then		ActiveDocument.VBProject.References.Remove MyRef	End IfEnd Sub
для удаления ссылки использован метод:
В данном примере:< имя процедуры> (Ball As Balloon, NumberOfButton As Long, iPriv As Long) - первый параметр задает объект Balloon, вызвавший:
В данном примере:< имя процедуры> (Ball As Balloon, NumberOfButton As Long, iPriv As Long) - какой из параметров, как правило, не используется в теле процедуры:
Сколько объектов Range упоминается в данном предложении:ActiveDocument.Range.Sections(1).Range.Paragraphs(1).Range.Sentences(1).Words(1).Characters(1)?
Данная процедура:
Public Sub AddPanel(PanelName As String)	'Добавляет и делает видимой панель с именем Panelname	'в коллекцию Commandbars	'Панель расположена вверху документа,	'не заменяет главное меню и не является временной	If Not ExistCommandBar(PanelName) Then		Call CommandBars.Add(name:=PanelName, Position:=msoBarTop, _		MenuBar:=False, Temporary:=False)	End If	CommandBars(PanelName).Enabled = True	CommandBars(PanelName).Visible = TrueEnd Sub
позволяет в любом из приложений Office 2000 добавить в коллекцию CommandBars:
Какой класс объектов библиотеки VBA имеет одно свойство UserForms и два метода - Load и Unload:
У метода FindControl объектов Commandbars и Commandbar ключом поиска является:
Текущий элемент Num коллекции Con задает порядковый номер персоны в списке, тогда по определению коллекции Number номер первого абзаца будет задаваться выражением: