01.Private Sub drugDGV_CellMouseUp(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles drugDGV.CellMouseUp
02. TabControl1.SelectedIndex = 0
03. If e.RowIndex <> -1 Then
04. With drugDGV
05. d_noTextBox.Text = .Rows.Item(e.RowIndex).Cells(1).Value.ToString()
06. d_instituteTextBox.Text = .Rows.Item(e.RowIndex).Cells(3).Value.ToString()
07. d_bookinTextBox.Text = .Rows.Item(e.RowIndex).Cells(4).Value.ToString()
08. d_dateDTPK.Value = .Rows.Item(e.RowIndex).Cells(2).Value.ToString()
09. d_bookdateDTPK.Value = .Rows.Item(e.RowIndex).Cells(5).Value.ToString()
10. End With
11. End If
12. End Sub
