If e.ColumnIndex = 5 Then
If Me.dgvData IsNot Nothing AndAlso Me.dgvData.CurrentRow IsNot Nothing Then
Me.dgvData.CurrentRow.Cells("Made_Cost").Value = Me.dgvData.CurrentRow.Cells("ItemmPrice").Value * Me.dgvData.CurrentRow.Cells("Made_Item").Value
End If
End If