В данном примере: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 является выходным и задает:
(Отметьте один правильный вариант ответа.)
Варианты ответа
объект класса Member
объект класса Reference(Верный ответ)
объект класса Lines
объект класса Module