一个不同于别的刷新问题（我看了论坛中所有关于刷新的贴子）

sam_yuan

我建了一个PHOTO窗体,有姓名、编号、一个图像框（image38）、另外我外接了一个摄影头加视频捕捉卡，代码如下：
Private Sub Form_Current()
        If Dir("\\192.168.123.22\当天照片\" & Me.体检表编号 & ".bmp") = "" Then
            image38.Picture = CurrentProject.Path & "\photo\" & "err.bmp"
        Else
            image38.Picture = "\\192.168.123.22\当天照片\" & Me.体检表编号 & ".bmp"
        End If
End Sub
我的问题是：当打开PHOTO窗体，用摄影头照相并将照片存于192.168.123.22\当天照片，在图像框（image38）并无刚照的照片，只有当关闭窗体并再次打开时才能看到照片，请教我该怎么做才能可以即时看到照片？我加了刷新按钮没有用处。
不知我说的大家明不明白。

[此贴子已经被作者于2004-1-6 13:35:07编辑过]

hi-wzj

建立一个刷新按钮，代码如下：
Private Sub 命令1_Click()
Form_Current
End Sub
或可用定时器定时刷新。

sam_yuan

我做好了,谢谢