Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Помогите разобраться с индексами  (Прочитано 5466 раз)
0 Пользователей и 2 Гостей смотрят эту тему.
Mefody
Сумасшедший программист
Участник

ru
Offline Offline
Пол: Мужской

« : 08-05-2010 11:31 » new

Дали такой кусок программы - подпрограмма и определение функции.

Private Sub FillQuestion(quest As Question, records As Variant, ByVal index As Integer)
With quest
.Count = records(0, index)
.AnswerType = records(1, index)
.Text = records(2, index)
End With
End Sub

Private Type Question
Count As Integer
AnswerType As Integer
Text As String
Answers(0 To 3) As String
AnswerCode As String
End Type

Внимание, вопрос: почему пишется records(0, index), records(1, index), records(2, index) ?
records - это что, массив? Или список с индексами? И зачем после каждого номера индекса добавляется слово index ?
Записан
RXL
Технический
Администратор

ru
Offline Offline
Пол: Мужской

WWW
« Ответ #1 : 08-05-2010 12:38 » 

Mefody, тип Variant может содержать любой встроенный тип, массив или ссылку на объект. Возможно тут многомерный массив или ссылка на объект.
"index" - не загадочное слово, а третий параметр твоей функции.
Записан

... мы преодолеваем эту трудность без синтеза распределенных прототипов. (с) Жуков М.С.
Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines