Проблема с сохранением значения в массиве

Question

Я хочу сохранить значение в массиве из моей базы данных.Я использую следующий код, но он возвращает ошибку: «Ссылка на объект не установлена ​​для экземпляра объекта.»

Код:

Dim w as integer=0

Do While DsChooseSQsNow.tblChooseSQs.Rows.Count > w
      vrSQsNoChosen(w) = DsChooseSQsNow.tblChooseSQs.Rows(w).Item("QNo")
      vrTotalSQsChosen = vrTotalSQsChosen + 1
      w = w + 1
Loop

Ошибка появляется "vrSQsNoChosen(w) = DsChooseSQsNow.tblChooseSQs.Rows(w).Item("QNo")"

Answer 1

попытаться напечатать значение DsChooseSQsNow.tblChooseSQs.Rows (w) .Item ("QNo")

или отладка кода

"Ссылка на объект не установлена ​​для экземпляра объекта." означает, что Item ("QNo") может быть нулевым

Answer 2

Есть много причин, по которым этот код не работает.Я бы начал проверку с:

• Размер (и границы) массива vrSQsNoChosen.
• w значение при возникновении ошибки (допустимый индекс для массива vrSQsNoChosen и Rows collection?).
• Item("QNo") значение при возникновении ошибки (может быть null?).

Также - VB.NET реализует оператор +=, так что выможно написать:

  w += 1

вместо:

 w = w + 1