Hello TWill and Greg,
Indeed, as Greg points, declaring an anonymous type in VB requires a period before the names of the properties. This article
can provide you with details about the subject.
Additionally, I would suggest to you to try rewriting the query that causes the error like this:
Dim dupValues = From mrows In dtLoadedData.Select()
Group mrows By GroupKey = New With
.a = mrows.Field(Of Object)(compositeColls(0).ColumnName),
.b = mrows.Field(Of Object)(compositeColls(1).ColumnName),
.c = mrows.Field(Of Object)(compositeColls(2).ColumnName),
.d = mrows.Field(Of Object)(compositeColls(3).ColumnName)
} Into grp = Group
Where grp.Count() >= 2
Select New With
.e = grp.Count()
I hope you find this feasible. If you have additional questions, or experience difficulties with the suggested solution, do not hesitate to get back to us.
OpenAccess ORM Q3 2013 simplifies your model operations even further providing you with greater flexibility. Check out the list of new features
shipped with our latest release!