level 1
小凡真的不是我
楼主
Access报表怎么设计一条记录显示一个图片？如图1所示。
我现在写的代码是一页显示多条记录，但是图片每张都一样。
Private Sub Report_Current()
Dim PhotoPath As String
PhotoPath = CurrentProject.Path & "\错题集\" & Me![错题照片地址] & ".jpg"
If Dir(PhotoPath) = "" Then PhotoPath = CurrentProject.Path & "\noimg.jpg"
Me.Image13.Picture = PhotoPathEnd Sub
代码是这样的，求大神帮忙修改修改
2017年02月21日 03点02分
1
我现在写的代码是一页显示多条记录，但是图片每张都一样。Private Sub Report_Current()
Dim PhotoPath As String
PhotoPath = CurrentProject.Path & "\错题集\" & Me![错题照片地址] & ".jpg"
If Dir(PhotoPath) = "" Then PhotoPath = CurrentProject.Path & "\noimg.jpg"
Me.Image13.Picture = PhotoPathEnd Sub
代码是这样的，求大神帮忙修改修改
