主题：关联表行内容不显示或显示不完整

Dim dr As Row = Tables("MainProcessData").Current

试试改成

Dim dr As Row = e.form.controls("Table1").Table.Current

如果还有问题，弹出 dr("PartID") 等的值看看是否正确。