i have a function this function this return this product
Private Function FindProduct(ByVal Name As String) As String
FindProduct = ""
Dim CS As New OService.ColumnSet
CS.Columns = {"productid", "name"}
Dim QE As New OService.QueryExpression
QE.ColumnSet = CS
QE.EntityName = "product"
Dim CE As New OService.ConditionExpression
CE.AttributeName = "productnumber"
CE.Operator = OService.ConditionOperator.Equal
CE.Values = New Object() {Name}
Dim FE As New OService.FilterExpression
FE.FilterOperator = OService.LogicalOperator.And
FE.Conditions = New OService.ConditionExpression() {CE}
QE.Criteria = FE
Dim EC As OService.EntityCollection
Dim OC As New OService.OrganizationServiceClient
EC = OC.RetrieveMultiple(QE)
For i As Integer = 0 To EC.Entities.Count - 1
FindProduct = EC.Entities(i).Attributes(0).Value.ToString
Next
End Function
ER.Id = New Guid(FindProduct(name).ToString)
ER.LogicalName = "product"
AC.Add(New KeyValuePair(Of String, Object)("product", ER))
where the program create i get this error