ServanteS87
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Здравствуйте, столкнулся с проблемой при редактировании значения DataGrid, находящегося в Form1 из Form 2
Form1 (sprbk):
Private Sub edtbtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles edtbtn.Click
Dim edt As New edtbk()
'Set the Parent Form of the Child window.
edt.MdiParent = main
'Внесение значений из датагрида в поля формы edtbk
edt.nmtxtbx.Text = DirectCast(BooksDataGridView.CurrentRow.Cells(2).Value, String)
edt.crtdttm.Value = DirectCast(BooksDataGridView.CurrentRow.Cells(1).Value, Date)
'Display the new form.
edt.Show()
End Sub
Form2(edtbk):
Private Sub okbtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles okbtn.Click
'Внесение изменений в таблицу
sprbk.BooksDataGridView.CurrentRow.Cells(2).Value = nmtxtbx.Text
sprbk.BooksDataGridView.CurrentRow.Cells(1).Value = crtdttm.Value
'Проверка введенных данных и сохранение изменений
Me.Validate()
Me.BooksBindingSource.EndEdit()
Me.TableAdapterManager.UpdateAll(Me.DipDataSet)
'Закрытие формы
Me.Close()
End Sub
Компилируется, но при нажатии на ОК в форме редактирования (Form2) выдает ошибку "ссылка на объект не указывает на экземпляр объекта"
Проблема точно в 4 и 5 строках дочерней формы, но как сделать правильно, я не знаю.
PS: Простите быдлокодера, но очень нужно... |
