Private Sub VIEW_indetailDataGridView_CellMouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles VIEW_indetailDataGridView.CellMouseUp
If e.RowIndex = VIEW_indetailDataGridView.Rows.Count - 1 Then
Exit Sub
End If
With VIEW_indetailDataGridView
stname.SelectedValue = .Rows.Item(e.RowIndex).Cells(0).Value.ToString()
stcode.Text = .Rows.Item(e.RowIndex).Cells(0).Value.ToString()
stin.Text = .Rows.Item(e.RowIndex).Cells(2).Value.ToString()
unit.Text = .Rows.Item(e.RowIndex).Cells(3).Value.ToString()
cost.Text = .Rows.Item(e.RowIndex).Cells(4).Value.ToString()
ComboBox1.SelectedValue = .Rows.Item(e.RowIndex).Cells(8).Value.ToString()
in_no.Text = .Rows.Item(e.RowIndex).Cells(9).Value.ToString()
Label13.Text = .Rows.Item(e.RowIndex).Cells(2).Value.ToString()
End With
End Sub