这个是BeforeDeleteFile 事件的代码：
Dim piv As WinForm.PictureViewer = Forms("新增业务单位信息").Controls("PictureViewer1")
Dim ywdwbm As String = Forms("新增业务单位信息").Controls("fkdwbm").value
Dim r As Row = Tables("作业单位").Current
ftp2.Host="192.168.254.201"
ftp2.Port="****"
ftp2.Account = "*****"
ftp2.Password = "**********"
ftp2.RootDir="/workunit/" & ywdwbm
piv.FTPclient=ftp2
If ftp2.Connected = True '如果FTP没有连接
piv.FTPclient.rootdir=ftp2.RootDir
Else
If ftp2.Connect Then
piv.FTPclient.rootdir=ftp2.RootDir
Else
MessageBox.show("网络不通,请稍后再试!","")
End If
End If
End If
Dim fl As String = piv.SelectedItem
If fl > "" Then
If ftp2.FileExists(fl) Then
piv.FTPclient.DeleteFile(fl)
End If
If Filesys.FileExists(ProjectPath & "RemoteFiles/workunit/" & ywdwbm & "/" & fl) Then
Filesys.DeleteFile(fl)
End If
End If
出现的问题是我删除了一个图片，按理说，PictureViewer控件里面没有图片了，但是重新进入控件后，在PictureViewer里面多了个方框，里面是我刚才删除的文件名，其他显示正常，不知道是哪的问题。请老师看看我的代码是不是有问题。
[此贴子已经被作者于2017/7/7 21:35:37编辑过]
加好友 
发短信
Post By：2017/7/7 21:35:00 [只看该作者]
