Динамический массив и Пустота
Добавлено: 14 сен 2008, 10:47
Писал макрос в MS Word и столкнулся с проблемой.
Как проще определить, что динамический массив пуст?
Я нашел только такой способ:
Dim A() As Long, i&
Erase A
On Error Resume Next
i = -1
i = UBound(A) - LBound(A)
On Error GoTo 0
If i < 0 Then
‘ массив пуст
End If
Может все не так сложно?
Буду благодарен за книги и документацию с практическими примерами по Visual Basic применительно именно к MS Word.
Как проще определить, что динамический массив пуст?
Я нашел только такой способ:
Dim A() As Long, i&
Erase A
On Error Resume Next
i = -1
i = UBound(A) - LBound(A)
On Error GoTo 0
If i < 0 Then
‘ массив пуст
End If
Может все не так сложно?
Буду благодарен за книги и документацию с практическими примерами по Visual Basic применительно именно к MS Word.