Propriedade OpenArgs

Importante :  Este artigo foi traduzido por um sistema de tradução automática, leia o aviso de isenção de responsabilidade. Para sua referência, veja a versão em inglês deste artigo aqui.

Aplicável a

Objeto de formulário

Objeto de relatório

Determina o expressão de cadeia de caracteres especificado pelo argumento OpenArgs do método OpenForm que abriu um formulário. Leitura/gravação Variant.

expressão. OpenArgs

expressão Necessário. Uma expressão que retorna um dos objetos na lista Aplica-se a.

Comentários

Essa propriedade está disponível somente usando um macro ou usando o Visual Basic for Applications) código do VBA (com o método OpenForm do objeto DoCmd . Esta configuração de propriedade é somente leitura em todos os modos de exibição.

Usar a propriedade OpenArgs , abra um formulário usando o método OpenForm do objeto DoCmd e defina o argumento OpenArgs à expressão de cadeia de caracteres desejado. A configuração da propriedade OpenArgs pode então ser utilizada no código do formulário, como em um abrir procedimento do evento. Você também pode consultar a configuração da propriedade em uma macro, como uma macro Open, ou uma expressão, como uma expressão que define a propriedade OrigemDoControle para um controle no formulário.

Por exemplo, suponha que o formulário aberto é uma lista de formulário contínuo de clientes. Se desejar que o foco para mover para um registro de cliente específico quando o formulário é aberto, você pode definir a propriedade OpenArgs como o nome do cliente e, em seguida, use a ação LocalizarRegistro em uma macro Open para mover o foco para o registro do cliente com o nome especificado.

Exemplo

O exemplo a seguir usa a propriedade OpenArgs para abrir o formulário de funcionários a um registro de funcionário específico e demonstra como o método OpenForm define a propriedade OpenArgs . Você pode executar esse procedimento conforme apropriado — por exemplo, quando o evento AfterUpdate ocorre para uma caixa de diálogo personalizado usada para inserir novas informações sobre um funcionário.

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

O exemplo a seguir usa o método FindFirst para localizar o funcionário nomeado na propriedade 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

Observação : Aviso de Isenção de Tradução Automática: Este artigo foi traduzido por computador, sem intervenção humana. A Microsoft oferece essas traduções automáticas para ajudar as pessoas que não falam inglês a aproveitar os textos escritos sobre produtos, serviços e tecnologias da Microsoft. Como este artigo foi traduzido automaticamente, é possível que contenha erros de vocabulário, sintaxe ou gramática.

Expanda suas habilidades
Explore o treinamento
Obtenha novos recursos primeiro
Ingressar no Office Insider

Essas informações foram úteis?

Obrigado por seus comentários!

Agradecemos pelos seus comentários! Parece que pode ser útil conectar você a um de nossos agentes de suporte do Office.

×