尺寸转换和计算公式报

aslxt

DoCmd.GoToControl "PO1"
  DoCmd.GoToRecord , , acFirst
  For i = 1 To [PO1]!Text40 - 1
    [PO1]!MO2_KG = [PO1]!Thick * [PO1]!Width / 1000 * [PO1]!Length / 1000 * [PO1]!MO2_Sheet * 7.85
   
   DoCmd.GoToRecord , , acNext
    'DoCmd.GoToRecord , , acNext
  Next i
改为：
     [PO1]!MO2_KG = [PO1]!Thick * [PO1]!Width / 1000 * [PO1]!Length / 1000 * [PO1]!MO2_Sheet * 7.85