主题：备注是否可以关联到另外一个表

应该是这样把：

Dim r As Row = CurrentTable.current

Dim mx As String 
Dim drs As List(Of DataRow)

drs = DataTables("出货明细").Select("[公司] = '" & r("公司") & "'")   ’公司 可以换成 A1
For Each dr As DataRow In drs
    r("出货明细") = ""
    mx = mx & dr("出货时间") & " " &  dr("出货数量") & vbCrLf

Next
r("出货明细") = mx