Método DataRecordset.GetRowData (Visio)

Obtiene los datos de todas las columnas de la fila especificada.

Nota:

Este objeto o miembro Visio solo se encuentra disponible para los usuarios con licencia de Visio Professional 2013.

Sintaxis

expresión. GetRowData (DataRowID)

Expresión Expresión que devuelve un objeto DataRecordset .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
DataRowID	Necesario	Long	Id. de la fila del conjunto de registros de datos a partir del cual desee recuperar datos.

Valor devuelto

Variant()

Comentarios

Para obtener los identificadores de fila de todas las filas del conjunto de registros de datos, use el método GetDataRowIDs . Vea el ejemplo de este tema.

Si pasa un id. de fila de cero para el parámetro DataRowID, el método GetRowData devuelve los nombres de las columnas del conjunto de registros de datos. Si pasa cualquier otro id. de fila válido cuyo valor no sea cero, el método GetRowData devuelve los valores de todas las columnas de la fila especificada, en el mismo orden que los nombres de las columnas que devuelve el método cuando pasa cero.

Ejemplo:

Esta macro de Microsoft Visual Basic para Aplicaciones (VBA) muestra cómo se pueden usar los métodos GetDataRowIDs y GetRowData para devolver el id. de fila de todas las filas y, a continuación, obtener los datos almacenados en todas las columnas de todas las filas del conjunto de registros de datos. La macro obtiene el recuento de todos los conjuntos de registros de datos asociados al documento actual y obtiene los datos de fila del agregado más recientemente. Recorre en iteración todas las filas del conjunto de registros de datos y, a continuación, recorre en iteración todas las columnas de esa fila. El código muestra la información devuelta en la ventana Inmediato.

Antes de ejecutar esta macro, cree al menos un conjunto de registros de datos en el documento actual.

Observe que la macro pasa una cadena vacía al método GetDataRowIDs con el fin de omitir el proceso de filtrado y obtener todas las filas del conjunto de registros. Después de ejecutar la macro, observe que el primer conjunto de datos mostrado (que corresponde a la primera fila de datos) contiene los encabezados de todas las columnas de datos del conjunto de registros de datos.

Public Sub GetRowData_Example() 
 
     
    Dim vsoDataRecordset As Visio.DataRecordset 
    Dim intCount As Integer 
    Dim lngRowIDs() As Long 
    Dim lngRow As Long 
    Dim lngColumn As Long 
    Dim varRowData As Variant 
 
    'Get the count of all data recordsets in the current document. 
    intCount = ThisDocument.DataRecordsets.Count 
 
    Set vsoDataRecordset = ThisDocument.DataRecordsets(intCount) 
 
    'Get the row IDs of all the rows in the data recordset 
    lngRowIDs = vsoDataRecordset.GetDataRowIDs("") 
 
    'Iterate through all the records in the data recordset. 
    For lngRow = LBound(lngRowIDs) To UBound(lngRowIDs) + 1 
        varRowData = vsoDataRecordset.GetRowData(lngRow) 
 
        'Print a separator between rows 
        Debug.Print "------------------------------" 
 
       'Print the data stored in each column of a particular data row. 
        For lngColumn = LBound(varRowData) To UBound(varRowData) 
            Debug.Print varRowData(lngColumn) 
        Next lngColumn 
    Next lngRow 
 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.