Array or user-defined type expected / Visual Basic

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Array or user-defined type expected

5 сообщений из 5, страница 1 из 1

Array or user-defined type expected

#37808911

Feanaro

Гость

Всем доброго утра.
Сегодня столкнулся со следующей проблемой. Есть процедурка, которая начиная с указанного элемента в массиве увеличивает его и все последующие элементы на указанную величину:

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.

Sub shiftArray(ByRef shiftingArray() As Integer, row As Integer, col As Integer, shift As Integer)

For j = col To UBound(shiftingArray, 2)
    shiftingArray(row, j) = shiftingArray(row, j) + shift
Next

For i = row + 1 To UBound(shiftingArray, 1)
    For j = 0 To UBound(shiftingArray, 2)
        shiftingArray(i, j) = shiftingArray(i, j) + shift
    Next
Next

End Sub

В другой процедуре имеется массив, сначала объявленный, его размеры были определены в самой процедуре:

Код: vbnet

1.
2.
3.

Dim hBounds() As Integer
...
ReDim hBounds(maxLvl - 1, 2)

В дальнейшем я вызываю свою процедуру:

Код: vbnet

Call shiftArray(hBounds, lvl - 1, 1, 1)

Вот тут компилятор сразу выдает ошибку :"Array or user-defined type expected"
Вот тут мне и непонятно, вроде в процедуре в качестве параметра указан массив Integer, при вызове передаю параметр такого же типа, а ошибка вылетает.

Подскажите, пожалуйста, в чем тут косяк?

...

Рейтинг:

0 / 0

24.05.2012, 08:01

| Ответить | Цитировать | Написать

Array or user-defined type expected

#37808942

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

As Variant параметр процедуры поставь

...

Рейтинг:

0 / 0

24.05.2012, 08:41

| Ответить | Цитировать | Написать

Array or user-defined type expected

#37809695

13-й квартал

Гость

Feanaro,

косяк где-то за пределами написанного, потому что по синтаксису всё верно. Поставьте в модулях Option Explicit, опишите явно переменные, и попробуйте откомпилировать (Debug -> Compile имя проекта VBA).

...

Рейтинг:

0 / 0

24.05.2012, 13:42

| Ответить | Цитировать | Написать

Array or user-defined type expected

#37809722

Shocker.Pro

Участник

Откуда: ->|<- :адуктО

Сообщения: 23 134

Рейтинг: 0 / 0

13-й кварталпотому что по синтаксису всё вернода, проверка показала, что не ругается:

Код: vbnet

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.

Private Sub Command1_Click()

Dim k() As Integer
Call r(k)
ReDim k(5, 5)
Call r(k)

End Sub
Sub r(ByRef w() As Integer)

End Sub

...

Рейтинг:

0 / 0

24.05.2012, 13:53

| Ответить | Цитировать | Написать

Array or user-defined type expected

#37810837

Feanaro

Гость

Шокер, спасибо, в качестве типа принимаемого параметра выставитл Variant, теперь работает.

...

Рейтинг:

0 / 0

25.05.2012, 07:21

| Ответить | Цитировать | Написать

5 сообщений из 5, страница 1 из 1

Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Array or user-defined type expected

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=60&fpage=78&tid=2157763]:	0ms
get settings:	8ms
get forum list:	14ms
check forum access:	3ms
check topic access:	3ms
track hit:	31ms
get topic data:	10ms
get forum data:	2ms
get page messages:	36ms
get tp. blocked users:	1ms
others:	14ms

total:	122ms