奇怪的问题?(不能正常显示图片)

laiguiyou

我在一个显示图片的窗体中,成为当前事件中写入以下代码,表示从产品图片文件夹中获取以产品代号相同的图片,在窗体中显示.同样的前端,在不同的机器中,有的可以正常显示图片,而有的机器则不能显示,这是为什么?

  

If Me.NewRecord = False Then
    If Dir(CurrentProject.path & "\产品图片\" & DLookup("照片", "产品表", "产品代号 like '" & Me![产品代号] & "'")) <> "" Then
        Me![照片图像].Picture = CurrentProject.path & "\产品图片\" & DLookup("照片", "产品表", "产品代号 like '" & Me![产品代号] & "'")
        Else
        Me![照片图像].Picture = ""
        End If
    End If

andymark

是否个别的机器没有完全安装

laiguiyou

试试看