Свойство (OpenArgs)

Важно :  Данная статья переведена с помощью машинного перевода, см. Отказ от ответственности. Используйте английский вариант этой статьи, который находится здесь, в качестве справочного материала.

Применение

Объект «Форма»

Объект «Отчет»

Определяет строковое выражение, указываемое аргументом OpenArgs метода OpenForm, который открывает форму. Данное свойство возвращает доступное для чтения и записи значение типа Variant.

выражение.OpenArgs

выражение Обязательное. Выражение, возвращающее один из объектов списка «Применение».

Замечания

Это свойство доступно только с помощью макрос или с помощью Visual Basic для приложений (VBA) с помощью метода ОткрытьФорму объекта DoCmd . Этот параметр свойства доступен только для чтения во всех представлениях.

Чтобы использовать свойство OpenArgs, откройте форму с помощью метода OpenForm объекта DoCmd и задайте аргумент OpenArgs нужному строковому выражению. После этого значение свойства OpenArgs можно использовать в коде для формы, например в процедура обработки событий «Открытие». На значение свойства также можно ссылаться в макросе, например макросе Открытие, или выражении, например выражении, задающем свойство Данные (ControlSource) для элемент управления в форме.

Предположим, что форму, которую вы открываете приведен список Ленточная форма клиентов. Если вы хотите фокус для перемещения к конкретному клиенту записи при открытии формы, присвойте свойству OpenArgs имя клиента и затем использовать макрокоманду НайтиЗапись в открытых макроса для перемещения фокуса на запись для клиента с указанным именем.

Пример

В следующем примере свойство OpenArgs используется, чтобы открыть форму «Сотрудники» для записи конкретного сотрудника. Здесь показано, как с помощью метода OpenForm задается свойство OpenArgs. Данную процедуру можно выполнять в зависимости от ситуации — например, когда для пользовательского диалогового окна, используемого для ввода новых сведений о сотруднике, происходит событие После обновления.

Sub OpenToCallahan()
DoCmd.OpenForm "Employees", acNormal, , , _
acReadOnly, , "Callahan"
End Sub
Sub Form_Open(Cancel As Integer)
Dim strEmployeeName As String
' If OpenArgs property contains employee name, find
' corresponding employee record and display it on
' form. For example,if the OpenArgs property
' contains "Callahan", move to first "Callahan"
' record.
strEmployeeName = Forms!Employees.OpenArgs
If Len(strEmployeeName) > 0 Then
DoCmd.GoToControl "LastName"
DoCmd.FindRecord strEmployeeName, , True, , _
True, , True
End If
End Sub

В следующем примере метод FindFirst используется для поиска сотрудника, названного в свойстве OpenArgs.

Private Sub Form_Open(Cancel As Integer)
If Not IsNull(Me.OpenArgs) Then
Dim strEmployeeName As String
strEmployeeName = Me.OpenArgs
Dim RS As DAO.Recordset
Set RS = Me.RecordsetClone
RS.FindFirst "LastName = '" & _
strEmployeeName & "'"
If Not RS.NoMatch Then
Me.Bookmark = RS.Bookmark
End If
End If
End Sub

Примечание : Отказ от ответственности относительно машинного перевода. Данная статья была переведена с помощью компьютерной системы без участия человека. Microsoft предлагает эти машинные переводы, чтобы помочь пользователям, которые не знают английского языка, ознакомиться с материалами о продуктах, услугах и технологиях Microsoft. Поскольку статья была переведена с использованием машинного перевода, она может содержать лексические,синтаксические и грамматические ошибки.

Совершенствование навыков
Перейти к обучению
Первоочередный доступ к новым возможностям
Присоединиться к программе предварительной оценки Office

Были ли сведения полезными?

Спасибо за ваш отзыв!

Благодарим за отзыв! Возможно, будет полезно связать вас с одним из наших специалистов службы поддержки Office.

×