Что делает SafeArrayCreateVector?

[tyomitch]

Creates a one-dimensional array whose lower bound is always zero.

...

lLbound
The lower bound for the array.

ы?

[Oxygen]

Яндекс рулит. Первая же ссылка http://www.firststeps.ru/mfc/comhelp/r.php?99 .

[tyomitch]

Oxygen, лучше бы читать вопрос, прежде чем постить

[Oxygen]

А что тебе непонятно? Вроде там все написано. По-английски, да и по-русски тоже. Ты конкретно объясни, что ты хочешь об этой функции услышать?

[ANDLL]

Ну там описочка. Можно и не ноль.
(Кстати, ура! теперь массивы в VB можно и не с нуля или единицы начинать!!!)

Код: Выделить всё

Option Explicit
Private Declare Function SafeArrayCreateVector Lib "oleaut32" (ByVal ntype As Integer, ByVal nLBound As Long, ByVal cEleents As Long) As Integer()
Dim nArr() As Integer

Private Sub Form_Load()
nArr = SafeArrayCreateVector(2, 10, 20)
MsgBox LBound(nArr)
End
End Sub


2Oxygen: Вопрос, ответ на который его интересовал написан в первом сообщение этого треда. Тебе также следует вчитаться, что написано по твоей ссылки и вдуматься, как это соотносится с приведенным тут примером.

[tyomitch]

А что, когда-то нельзя было?

Код: Выделить всё

Dim nArr() As Integer
ReDim Arr(-10 To 10)


Так значит, описка в первом предложении?

[ANDLL]

Выходит что можно.
Да, видимо описка.

[tyomitch]

Ладно, зато SafeArrayCreateVector позволяет создавать пустые массивы (0 To -1): голым VB так нельзя

[Approximator]

Ладно, зато SafeArrayCreateVector позволяет создавать пустые массивы (0 To -1): голым VB так нельзя

Про голый VB возражений (почти ) нет, но это ведь можно сделать и с помощью SafeArrayAllocDescriptor.