Warning: file_get_contents(/data/phpspider/zhask/data//catemap/6/entity-framework/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/jquery-ui/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net LINQ to实体无法识别该方法(无法将该方法转换为存储表达式)_Vb.net_Entity Framework_Linq - Fatal编程技术网

Vb.net LINQ to实体无法识别该方法(无法将该方法转换为存储表达式)

Vb.net LINQ to实体无法识别该方法(无法将该方法转换为存储表达式),vb.net,entity-framework,linq,Vb.net,Entity Framework,Linq,我有个例外LINQ to Entities无法识别“System.Object CompareObject Equal(System.Object,System.Object,Boolean)”方法,此方法无法转换为存储表达式。 “我的实体”有一个包含3个字段的表,a_Id是一个自动编号整数,TidFk是一个整数,AuditNotes是一个Nvarchar(Max),不为空,默认为“” 我的模型有以下几点 Public Class Audit Public Property AId A

我有个例外LINQ to Entities无法识别“System.Object CompareObject Equal(System.Object,System.Object,Boolean)”方法,此方法无法转换为存储表达式。

“我的实体”有一个包含3个字段的表,a_Id是一个自动编号整数,TidFk是一个整数,AuditNotes是一个Nvarchar(Max),不为空,默认为“”

我的模型有以下几点

Public Class Audit

    Public Property AId As Integer
    Public Property TIdFk As Integer
    Public Property AuditNote As String

    Public Sub New()
        AId = 0
        TIdFk = 0
        AuditNote = ""
    End Sub

    Public Sub GetAuditFor(tID)

        Dim de As New EHREntities

        Try
            Dim aud = (From a In de.Tbl_Audit
                       Where a.TidFk = tID
                       Select a).FirstOrDefault()

            If IsNothing(aud) Then
                AId = 0
                TIdFk = tID
                AuditNote = ""
            Else

                AId = aud.A_id
                TIdFk = aud.TidFk
                AuditNote = aud.AuditNote.ToString().Replace("<<", "<b>").Replace(">>", "</b>").Replace("<>", " <span class="" error"">&#8226;</span> ")

            End If

        Catch ex As Exception

            AId = 0
            TIdFk = tID
            AuditNote = "<span class=""error"">Error! </span>" & ex.Message

        Finally
            de.Dispose()
        End Try

    End Sub
End Class
该类失败,子GetAuditFor(tID)出现上述异常


我已尽我所能确定异常的原因,但失败了。。。例外情况提到布尔值,但没有布尔值。。。感谢您的帮助。

业余爱好者
Public-Sub-GetAuditFor(tID)
应该是
Public-Sub-GetAuditFor(tID为整数)
。。。。那是我生命中的一个小时,我再也回不来了

选项严格地写在文件的顶部,这样将来可以节省一些时间
Function FetchAuditFor(tId As Integer) As PartialViewResult

        Dim auditNote As New Audit

        auditNote.GetAuditFor(tId)

        Return PartialView("_AuditNote", auditNote)

    End Function