Функція CallByName

Увага! : Цю статтю перекладено за допомогою служби машинного перекладу; див. застереження. Версію цієї статті англійською мовою див. тут для отримання довідки.

Виконує метод об'єкта або набори повертає властивості на об’єкт.

Синтаксис

CallByName ( об'єкта , procname, calltype [, аргументи()])

Синтаксис функції CallByName має такі аргументи:

Аргумент

Опис

об'єкт

Обов'язковий аргумент. Варіант (Об'єкт). Ім'я об'єкта, на якому буде виконано функцію.

procname

Обов'язковий аргумент. Варіант (Рядок). Рядковий вираз, що містить ім'я властивості або методу об'єкта.

calltype

Обов'язковий аргумент. Константи. Константа тип vbCallType , яке позначає тип дії, які телефонують.

аргументи ()

Необов'язково. Варіант (Масив).


Примітки

Функція CallByName використовується, щоб отримати або встановити властивість або виклику методу під час виконання за допомогою імені рядка.

У наведеному нижче прикладі перший рядок використовує CallByName властивість MousePointer текстового поля, у другому рядку отримує значення властивості MousePointer та третього рядка викликає метод переміщення , щоб перемістити текстове поле:

CallByName Text1, "MousePointer", vbLet, vbCrosshair
Result = CallByName (Text1, "MousePointer", vbGet)
CallByName Text1, "Move", vbMethod, 100, 100

Приклад

Примітка : У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.

У цьому прикладі використовується функція CallByName посилатися переміщення метод командної кнопки.

У прикладі також використовується у формі (Form1) з кнопкою (Command1) а підпис (Label1). Під час завантаження форми, властивість підпис підпису встановлено ім'я спосіб виклику, у цьому випадку "Перемістити". Після натискання кнопки, функція CallByName викликає метод, щоб змінити розташування кнопки.

Option Explicit
Private Sub Form_Load()
Label1.Caption = "Move"' Name of Move method.
End Sub
Private Sub Command1_Click()
If Command1.Left <> 0 Then
CallByName Command1, Label1.Caption, vbMethod, 0, 0
Else
CallByName Command1, Label1.Caption, vbMethod, 500, 500
End If

Примітка : Застереження про машинний переклад: Цю статтю перекладено комп’ютерною системою без втручання людини. Корпорація Майкрософт пропонує таку послугу, щоб іншомовні користувачі могли дізнаватися про продукти, служби й технології Microsoft. Оскільки статтю перекладено за допомогою служби машинного перекладу, вона може містити смислові, синтаксичні або граматичні помилки.

Отримуйте нові функції раніше за інших
Приєднайтеся до оцінювачів Office

Ця інформація корисна?

Дякуємо за ваш відгук!

Дякуємо за відгук! Схоже, вам може стати в нагоді допомога одного з наших спеціалістів служби підтримки Office, з яким ми вас можемо з’єднати.

×