他这个循环有问题:
Dim tbl As Table = Tables("居民信息表")Dim tb2 As Table = Tables("居民信息表.相片")For i As Integer = tbl.TopRow To tbl.BottomRow For s As Integer = tb2.TopRow To tb2.BottomRow
其实第二个循环,打印的始终是居民信息表当前行对应的相片,因为第二个循环的是关联表,其实应该用GetChildRows