2009-10-19 3 views
0

Я пытаюсь преобразовать этот код из csharp в vb. Использовал всех детей бесплатно csharp для конвертера vb, но получал ошибку. сообщите, если кто-то решил эту проблему раньше.twitter oauth icomparer error

ошибка:

класса 'QueryParameterComparer' должен реализовывать 'Функция сравнения (х Как OAuthBase.QueryParameter, у Как OAuthBase.QueryParameter) As Integer' для интерфейса 'System.Collections.Generic.IComparer (Of QueryParameter)'

из C# код:

protected class QueryParameterComparer : IComparer<QueryParameter> 
    { 

     public int Compare(QueryParameter x, QueryParameter y) 
     { 
      if (x.Name == y.Name) 
      { 
       return string.Compare(x.Value, y.Value); 
      } 
      else 
      { 
       return string.Compare(x.Name, y.Name); 
      } 
     } 

    } 

В.Б. код

Protected Class QueryParameterComparer 
     Implements IComparer(Of QueryParameter) 

     #Region "IComparer Members" 

     Public Function Compare(ByVal x As QueryParameter, ByVal y As QueryParameter) As Integer 
      If x.Name = y.Name Then 
       Return String.Compare(x.Value, y.Value) 
      Else 
       Return String.Compare(x.Name, y.Name) 
      End If 
     End Function 

     #End Region 
    End Class 

ответ

1

Попробуйте вставить OAuthBase. перед каждым из ваших типов параметров?

Или используйте библиотеку OAuth, такую ​​как DotNetOpenAuth или LinqToTwitter, так что вам не о чем беспокоиться. :)

+0

oAuthBase работал. Спасибо – vamsivanka

+0

Я сделал это раньше, но мне нужно добавить к реализации IComparer (Of oAuthBase.QueryParameter) – vamsivanka

-1
Public Function Compare(ByVal x As OAuth.QueryParameter, ByVal y As OAuth.QueryParameter) As Integer _ 
    Implements IComparer(Of QueryParameter).Compare 
1

Добавьте это в конце функции декларации

Реализует IComparer (Из QueryParameter) .Compare

так, то это:

Public Function Compare(ByVal x As QueryParameter, ByVal y As QueryParameter) As Integer Implements IComparer(Of QueryParameter).Compare 
     If (x.Name = y.Name) Then 
      Return String.Compare(x.Value, y.Value) 
     Else 
      Return String.Compare(x.Name, y.Name) 
     End If 
    End Function