主题：识别+个数，并在子表中添加相应明细个数

button-click

订单主表中规格列内容为 1N+2N+3N

识别出两个“+”后怎么

Dim dr As Row = Tables("订单").Current
    If dr("核销") = False Then
        Dim str As String = dr("规格")
        Dim m As Integer = str.split("+").length-1

如何在订单明细中，新增“+”数+1行（3行）

并且Dim dr2 As Row = Tables("订单.订单明细").AddNew()

dr2("型号") = dr("型号") '由于型号牵扯到其他表关联不能使用表达式

3条明细的规格分别是 1N、2N、3N