明らかなことを見逃しているのではないかと心配しています。以下のコードは、SaveChanges() でゼロ除算エラーを生成します。これの考えられる原因をほぼどこでも検索しましたが、見つかりません。誰かが私を正しい方向に向けてください。
ありがとう
Public Sub AddDetailRecords()
Dim products As List(Of Product)
'code that builds a list of products
For Each prd In products
Dim eqDetail As New EmployeeQuoteDetail
Dim rateRec As Rate = RateRecord(prd)
eqDetail = DetailRecordForProduct(prd, eqDetail)
eqDetail.netRate = rateRec.rate1
eqDetail.ratePer = rateRec.ratePer
db.EmployeeQuoteDetail.Add(eqDetail)
Next
db.SaveChanges()
End Sub