Member 13341316 Ответов: 1

Необработанное исключение типа "system.nullreferenceexception" произошло в windowsapplication2.exe дополнительная информация: ссылка на объект не установлена на экземпляр объекта.

Dim xlApp как Microsoft.Офис.Взаимодействие.Превосходить.Приложение
Dim xlWorkBook как Microsoft.Офис.Взаимодействие.Превосходить.Рабочая тетрадь
Dim xlWorkSheet как Microsoft.Офис.Взаимодействие.Превосходить.Рабочий лист
Dim misValue As Object = System.Отражение.Недостающий.Ценность
Dim i как целое число
Dim j как целое число

xlApp = новый Microsoft.Офис.Взаимодействие.Превосходить.Приложение
xlWorkBook = xlApp.Книги.Добавить (неверное значение)
xlWorkSheet = xlWorkBook.Sheets("Лист1")

Для i = 0 для TblhistologyDataGridView.Количество строк - 1
Для j = 0 для TblhistologyDataGridView.ColumnCount - 1
Для k как целое число = 1 для TblhistologyDataGridView.Столбцы.Рассчитывать
xlWorkSheet.Ячейки (1, k) = TblhistologyDataGridView.Столбцы (k-1). HeaderText
xlWorkSheet.Ячейки (1 + 2, j + 1) = TblhistologyDataGridView(j, i). значение.Метод toString()
Следующий
Следующий
Следующий
xlWorkSheet.Сохранить Как("D:\vbexcel.xlsx")
xlWorkBook.Закрывать()
xlApp.Бросить()

releaseObject(xlApp)
releaseObject(xlWorkBook)
releaseObject(xlWorkSheet)

MsgBox("вы можете найти файл D:\vbexcel.xlsx")
Dim res как MsgBoxResult
res = MsgBox ("процесс завершен, вы хотите открыть файл?", MsgBoxStyle.Да нет)
If (res = MsgBoxResult.Да) Тогда
Процесс.Начало("d:\vbexcel.xlsx")
Конец, Если
Конец Подводной Лодки
Private Sub releaseObject(ByVal obj As Object)
Попробуй
Система.Время Выполнения.InteropServices.Маршал.Метода releasecomobject(объект)
obj = ничего
Поймать ex как исключение
obj = ничего
Окончательно
СБОРЩИК МУСОРА.Собирать()
Конец Попытки
Конец Подводной Лодки
Конец Класса

Что я уже пробовал:

пожалуйста, любезно помогите мне с этой ошибкой. Огромное спасибо!

1 Ответов

Рейтинг:
0

OriginalGriff

Это одна из самых распространенных проблем, которые нам задают, и это также та, на которую мы меньше всего готовы ответить, но вы больше всего готовы ответить сами.

Позвольте мне просто объяснить, что означает ошибка: вы пытались использовать переменную, свойство или возвращаемое значение метода, но оно содержит null - что означает, что в переменной нет экземпляра класса.
Это немного похоже на карман: у вас есть карман в рубашке, в котором вы держите ручку. Если вы сунете руку в карман и обнаружите, что там нет ручки, вы не сможете подписать свое имя на листе бумаги - и вы получите очень забавный вид, если попытаетесь! Пустой карман дает вам нулевое значение (здесь нет ручки!), поэтому вы не можете сделать ничего такого, что обычно делали бы, когда извлекли свою ручку. Почему он пуст? Вот в чем вопрос - может быть, вы забыли взять ручку, когда уходили из дома сегодня утром, или, возможно, вы оставили ручку в кармане вчерашней рубашки, когда снимали ее вчера вечером.

Мы не можем сказать, потому что нас там не было, и, что еще важнее, мы даже не можем видеть вашу рубашку, не говоря уже о том, что находится в кармане!

Вернемся к компьютерам, и вы каким - то образом сделали то же самое-и мы не можем увидеть ваш код, а тем более запустить его и узнать, что содержит null, когда это не должно быть.
Но вы можете - и Visual Studio поможет вам здесь. Запустите свою программу в отладчике, и когда она выйдет из строя, VS покажет вам строку, на которой она обнаружила проблему. Затем вы можете начать просматривать различные его части, чтобы увидеть, какое значение равно null, и начать просматривать свой код, чтобы выяснить, почему. Поэтому поставьте точку останова в начале метода, содержащего строку ошибки, и снова запустите программу с самого начала. На этот раз VS остановится перед ошибкой и позволит вам изучить, что происходит, пройдя через код, глядя на ваши значения.

Но мы не можем этого сделать - у нас нет вашего кода, мы не знаем, как его использовать, если бы он у нас был, у нас нет ваших данных. Так что попробуйте - и посмотрите, сколько информации вы сможете узнать!