I have
For Each itemSN As SellingDetailSNCustomer In item.listSN Dim newItem As New TR_Selling_Customer_Product_SN newItem.FK_Selling_Detail_Customer_