主题：求助帖：刚接触狐表，想做个实验分析记录管理，遇到了问题，求大神指点！

1、空白吸光、校正空白是什么东西？表里面没有；

2、引用父表数据

http://www.foxtable.com/help/topics/0106.htm

http://www.foxtable.com/help/topics/0025.htm

3、平行测定又是什么东西？

4、请去学习foxtable的编程 http://www.foxtable.com/help/topics/1592.htm

 上传试用版的例子。

 再有，4、曲线截距和斜率的计算逻辑是什么

 用的外部数据源，Data文件夹中。

另外还有就是当在分光法记录主表.分光发记录明细的关联表中更改了标有空白的第一行的样品吸光度后，所有子表行中的校正吸光度自动重新计算如何实现，

在AfterEdit事件中写如下代码，提示“调用的目标发生了异常。”不知道问题出在哪里，求学习。

If Tables("分光法记录主表.分光法记录明细").Rows("样品吸光度").Index=0 Then
   With CurrentTable
      .Cols("校正吸光度").DataCol.RaiseDataColChanged()
   End With
End If

案例文件见附件。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:foxtable项目.zip

 Datacolchanged事件，代码

Select Case e.DataCol.Name
    Case "样品编号","样品类型","取样体积","前处理后体积","分取体积","稀释倍数","样品吸光度"
        Dim idx As Integer = Tables("分光法记录主表.分光法记录明细").FindRow(e.DataRow)
        If idx > -1 Then
            If idx = 0 Then
                e.DataTable.DataCols("样品吸光度").RaiseDataColChanged("_Identify <> " & e.DataRow("_Identify") & " And 项目编号 = '" & e.DataRow("项目编号") & "'")
            Else
                e.DataRow("校正吸光度") = e.DataRow("样品吸光度")-Tables("分光法记录主表.分光法记录明细").Rows(0)("样品吸光度")
                Dim pdr As DataRow = e.DataRow.GetParentRow("分光法记录主表")
                e.DataRow("样品浓度") = (e.DataRow("校正吸光度") - pdr("截距")) / (pdr("斜率") * e.DataRow("取样体积")) * iif(e.DataRow.isnull("稀释倍数"), 1, e.DataRow("稀释倍数"))
                If e.DataRow("样品类型") = "平行" Then
                    Dim fdr As DataRow = e.DataTable.Find("项目编号 = '" & e.DataRow("项目编号") & "' And 样品编号 = '" & e.DataRow("样品编号") & "'")
                    If fdr IsNot Nothing Then
                        e.DataRow("相对偏差") = Math.Abs(fdr("样品浓度") - e.DataRow("样品浓度")) / (fdr("样品浓度") + e.DataRow("样品浓度")) * 100
                    End If
                End If
            End If
        End If
End Select