Описание
Поменять местами две указанные строки.
Определение
| Visual Basic |
|---|
Public Sub Swap( _ ByVal AttributeRow1 As Variant, _ ByVal AttributeRow2 As Variant _ ) |
Параметры
- AttributeRow1
- Порядковый номер, ссылка на объект TDMS~TDMSAttributeRow, дескриптор или описание первой строки.
- AttributeRow2
- Порядковый номер, ссылка на объект TDMS~TDMSAttributeRow, дескриптор или описание второй строки.
Заметки
Метод выполяет перемещение строк в локальной копии коллекции, без обращения к базе данных. Для того, чтобы изменения были сохранены, необходимо вызвать метод Update (иначе редактирование будет потеряно):
Set TAttr = ThisObject.Attributes("ATTR_TABLE")
'Правильно:
Set Rows = TAttr.Rows
Rows.Swap Rows(0), Rows(1)
Rows.Update
'Неправильно:
TAttr.Rows.Swap TAttr.Rows(0), TAttr.Rows(1)