Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Нижняя граница всегда 0 - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин  
Нижняя граница всегда 0
Интересная фишка?
Johny Дата: Понедельник, 08.04.2013, 10:30 | Сообщение № 1
Группа: Друзья
Ранг: Новичок
Сообщений: 14
Репутация: 13 ±
Замечаний: 0% ±

2013
Все мы знаем, что функция Array возвращает нам массив с нижней границей, которая зависит от Option Base, которая по умолчанию является 0.
Если Option Base равна 1, то и нижняя граница тоже 1.
Вопрос: как сделать так, чтобы нижняя граница массива, создаваемого функцией Array, всегда была 0 в независимости от Option Base? smile
Решение в четыре символа. )


There is no knowledge that is not power

Сообщение отредактировал Johny - Понедельник, 08.04.2013, 10:33
 
Ответить
СообщениеВсе мы знаем, что функция Array возвращает нам массив с нижней границей, которая зависит от Option Base, которая по умолчанию является 0.
Если Option Base равна 1, то и нижняя граница тоже 1.
Вопрос: как сделать так, чтобы нижняя граница массива, создаваемого функцией Array, всегда была 0 в независимости от Option Base? smile
Решение в четыре символа. )

Автор - Johny
Дата добавления - 08.04.2013 в 10:30
Johny Дата: Понедельник, 08.04.2013, 11:19 | Сообщение № 2
Группа: Друзья
Ранг: Новичок
Сообщений: 14
Репутация: 13 ±
Замечаний: 0% ±

2013
В документации говорится, что "массивы, созданные с помощью функции Array, имеют основание равное нулю; на это значение не оказывает влияния установка оператора Option Base."
Это не так. Нижеприведённый код доказывает, что это не так. Будьте осторожны! biggrin

[vba]
Код
Option Base 1

Sub TestArray()
Dim arr As Variant
arr = Array(1, 2, 3)
MsgBox LBound(arr)
End Sub
[/vba]


There is no knowledge that is not power
 
Ответить
СообщениеВ документации говорится, что "массивы, созданные с помощью функции Array, имеют основание равное нулю; на это значение не оказывает влияния установка оператора Option Base."
Это не так. Нижеприведённый код доказывает, что это не так. Будьте осторожны! biggrin

[vba]
Код
Option Base 1

Sub TestArray()
Dim arr As Variant
arr = Array(1, 2, 3)
MsgBox LBound(arr)
End Sub
[/vba]

Автор - Johny
Дата добавления - 08.04.2013 в 11:19
LightZ Дата: Понедельник, 08.04.2013, 12:13 | Сообщение № 3
Группа: Авторы
Ранг: Форумчанин
Сообщений: 120
Репутация: 48 ±
Замечаний: 0% ±

Есть решение : D


E-mail: overseerpower@gmail.com
Skype: Bogdan_Rud
WMR: R166238237296
 
Ответить
СообщениеЕсть решение : D

Автор - LightZ
Дата добавления - 08.04.2013 в 12:13
ikki Дата: Суббота, 13.04.2013, 20:42 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
неделя прошла.
это ваш обоюдный секрет? biggrin
рассказывайте уже.


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki
 
Ответить
Сообщениенеделя прошла.
это ваш обоюдный секрет? biggrin
рассказывайте уже.

Автор - ikki
Дата добавления - 13.04.2013 в 20:42
RAN Дата: Вторник, 16.04.2013, 19:32 | Сообщение № 5
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Johny, LightZ, Вы колоться собираетесь? Или за отдельную плату? smile


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеJohny, LightZ, Вы колоться собираетесь? Или за отдельную плату? smile

Автор - RAN
Дата добавления - 16.04.2013 в 19:32
LightZ Дата: Вторник, 16.04.2013, 21:09 | Сообщение № 6
Группа: Авторы
Ранг: Форумчанин
Сообщений: 120
Репутация: 48 ±
Замечаний: 0% ±

Ой, а я уж и забыл biggrin
a = VBA.Array(1, 2, 3)

http://www.planetaexcel.ru/forum....GEN_1=1


E-mail: overseerpower@gmail.com
Skype: Bogdan_Rud
WMR: R166238237296
 
Ответить
СообщениеОй, а я уж и забыл biggrin
a = VBA.Array(1, 2, 3)

http://www.planetaexcel.ru/forum....GEN_1=1

Автор - LightZ
Дата добавления - 16.04.2013 в 21:09
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!