Método Shape.GetLinkedDataRow (Visio)

Obtém a identificação da linha de dados no conjunto de registros de dados especificado vinculado à forma.

Observação

This Visio object or member is available only to licensed users of Visio Professional 2013.

Sintaxe

expression. GetLinkedDataRow( _DataRecordsetID_ )

Expressão Uma expressão que retorna um objeto Shape .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
DataRecordsetID Obrigatório Long A identificação do conjunto de registros de dados contendo a linha vinculada.

Valor de retorno

Long

Comentários

O método GetLinkedDataRow falhará se a forma não estiver vinculada a uma linha de dados.

Exemplo

A macro do Microsoft Visual Basic for Applications (VBA) a seguir mostra como usar o método GetLinkedDataRow para obter a ID da linha de dados no conjunto de registros de dados especificado vinculado à forma.

Antes de executar essa macro, adicione pelo menos um conjunto de registros de dados à coleção DataRecordsets do documento. A macro solta uma forma na página, vincula a forma a uma linha de dados no conjunto de registros de dados adicionado mais recentemente à coleção, obtém a ID da linha e, em seguida, imprime a ID da linha na janela Imediata.

Public Sub GetLinkedDataRow_Example() 
 
    Dim vsoDataRecordset As Visio.DataRecordset 
    Dim vsoShape As Visio.Shape 
    Dim intCount As Integer 
    Dim lngRowID As Long 
     
    intCount = Visio.ActiveDocument.DataRecordsets.Count 
    Set vsoDataRecordset = Visio.ActiveDocument.DataRecordsets(intCount) 
     
    Set vsoShape = ActivePage.DrawRectangle(2, 2, 4, 4) 
         
    vsoShape.LinkToData vsoDataRecordset.ID, 1, True 
            
    lngRowID = vsoShape.GetLinkedDataRow(vsoDataRecordset.ID) 
    Debug.Print lngRowID 
         
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.