01.
Private
Sub
DataGridView1_CellContentClick(
ByVal
sender
As
System.
Object
,
ByVal
e
As
System.Windows.Forms.DataGridViewCellEventArgs)
Handles
DataGridView1.CellContentClick
02.
With
DataGridView1
03.
TbProID.Text =
CStr
(.Rows.Item(e.RowIndex).Cells(0).Value)
04.
TbProName.Text =
CStr
(.Rows.Item(e.RowIndex).Cells(1).Value)
05.
ComboBox3.Text =
CStr
(.Rows.Item(e.RowIndex).Cells(2).Value)
06.
ComboBox4.Text =
CStr
(.Rows.Item(e.RowIndex).Cells(3).Value)
07.
TbPrice.Text =
CStr
(.Rows.Item(e.RowIndex).Cells(2).Value)
08.
LblStock.Text =
CStr
(.Rows.Item(e.RowIndex).Cells(3).Value)
09.
10.
End
With
11.
Panel1.Visible =
False
12.
TBAmount.Focus()
13.
14.
End
Sub