关于引用的目标不存在时如何判断的问题

ty_1029

其实很简单,就是对当前窗体中的放置一个IMG控件,然后设定路径,通过下面的代码可以实现给IMG把图片加上

1. Me.Image0.Picture = "\\168.192.1.25\img\02.BMP"

复制代码

以后如果需要变更图片,只需要把文件夹下的02.BMP图片更换就可以了.

现在的问题想请教各位,
如果当02.BMP图片不存在的时候,我希望实现代码变化为:

1. Me.Image0.Picture = "\\168.192.1.25\img\moren.BMP"

复制代码

当然,存在的话,还是:

1. Me.Image0.Picture = "\\168.192.1.25\img\02.BMP"

复制代码

如何判断啊,请高手支照!!!!!

wanshan

关于此问题，用if then判断一下就可以了，在http://218.242.234.226/wanshan/mdbshell/index.asp中有涉及到，有兴趣的，可以看看！

ty_1029

看了一下，但还是不明白如何判断,我也知道要用IF做判断,但条件应该如何写呢~~

高手帮忙看一下吧~

ty_1029

各位老大,拜托了，期盼啊~~~~~~~~~~~

wanshan

If Dir("\\168.192.1.25\img\02.BMP", vbDirectory) = ""  or isnull("\\168.192.1.25\img\02.BMP") Then
     Me.Image0.Picture = "\\168.192.1.25\img\moren.BMP"
Else
        Me.Image0.Picture = "\\168.192.1.25\img\02.BMP"
End If

ty_1029

谢谢老大,马上去试一下,呵呵,开心啊~~~~~~~~~~~