C# ошибки преобразования VB интерфейс

Question

Здесь C# код

namespace WpfApplication9.ViewModels.Interfaces 
{ 
    public interface ITradeViewModel 
    { 
     ObservableCollection<Trade> GetTrades(); 
    } 
} 

namespace WpfApplication9.ViewModel 
{ 
    public class TradesViewModel : BaseViewModel, ITradeViewModel 
    { 
     private ObservableCollection<Trade> _trades = new ObservableCollection<Trade>(); 

     private ICommand _saveCommand; 
     private ICommand _loadCommand; 

     public TradesViewModel() 
     { 
      _saveCommand = new SaveTradesCommand(); 
      _loadCommand = new LoadTradesCommand(); 
      _trades = GetTrades(); 
     } 

     public ObservableCollection<Trade> Trades { get {return _trades;} } 

     public ObservableCollection<Trade> GetTrades() 
     { 
      if (_trades == null || _trades.Count == 0) 
       _loadCommand.Execute(_trades); 
      return _trades; 
     } 
    } 
} 

и когда я преобразовать это в VB, как показано ниже,

Namespace WpfApplication9.ViewModels.Interfaces 
    Public Interface ITradeViewModel 
     Function GetTrades() As ObservableCollection(Of Trade) 
    End Interface 
End Namespace 


Namespace WpfApplication9.ViewModel 
    Public Class TradesViewModel 
     Inherits BaseViewModel 
     Implements ITradeViewModel 

     Private _trades As New ObservableCollection(Of Trade)() 

     Private _saveCommand As ICommand 
     Private _loadCommand As ICommand 

     Public Sub New() 
      _saveCommand = New SaveTradesCommand() 
      _loadCommand = New LoadTradesCommand() 
      _trades = GetTrades() 
     End Sub 

     Public ReadOnly Property Trades() As ObservableCollection(Of Trade) 
      Get 
       Return _trades 
      End Get 
     End Property 

     Public Function GetTrades() As ObservableCollection(Of Trade) 
      If _trades Is Nothing OrElse _trades.Count = 0 Then 
       _loadCommand.Execute(_trades) 
      End If 
      Return _trades 
     End Function 
    End Class 
End Namespace 

Он вернет мне ошибку, которая говорит мне GetTrades для Интерфейс ITradeViewModel не реализован?

Что я делаю неправильно?

спасибо,

Answer 1

Вы должны явно реализовать метод, добавив Implements ITradeViewModel.GetTrades:

Public Function GetTrades() As ObservableCollection(Of Trade) Implements ITradeViewModel.GetTrades 
     If _trades Is Nothing OrElse _trades.Count = 0 Then 
      _loadCommand.Execute(_trades) 
     End If 
     Return _trades 
    End Function 

VB.NET, в отличие от C#, does not have implicit interface implementation.