主题：[求助]我的代码哪里出错了

 代码没问题，合成的路径改一下，路径不能有错

 

FileSys.FileExists("F:\小陶\照片\" & str1) 

 你的文件放在哪个文件夹里？

 nothing 就是空白字符串啊，你可以改成 "不存在"

 那说明你的表没有数据

 

Dim lj As String = ProjectPath
For Each dr As DataRow In CurrentTable.DataTable.dataRows
    Dim str1 As String =dr("头像照片")
    If FileSys.FileExists(lj & "Attachments\" & str1)  = True Then
        dr("判断") = "找到"
    Else
       
        dr("判断") = "找不到"
    End If
Next

 那段代码单独写到一个按钮里面去啊。

 

 如果写到Datacolchangied事件，就这样写

 

 

If e.DataCol.Name = "头像照片" Then
    Dim lj As String = ProjectPath
   
    Dim str1 As String = e.DataRow("头像照片")
    If FileSys.FileExists(lj & "Attachments\" & str1)  = True Then
        e.DataRow("判断") = "找到"
    Else
        e.DataRow("判断") = "找不到"
    End If
End If

1、找不到，说明你路径写得有问题，说明不存在对应文件啊；

 

2、写到事件里去，你必须修改图片了，或者重置图片列，才会触发代码啊。