如何在 VB.NET 中做到这一点？答案

【问题标题】：How to do this in VB.NET?如何在 VB.NET 中做到这一点？
【发布时间】：2011-11-08 07:37:01
【问题描述】：

我在将此 C# 代码转换为 VB.net 时遇到问题。 loadLecturer 转换为 VB.NET 后似乎有问题

InitializeComponent()之后的VB代码

context.Load(context.GetLecturesQuery(), LoadLecturer, Nothing)

我希望转换和调试的 C# 代码

private void LoadLecturer(LoadOperation<tblLecturer> obj)
{
    foreach (var item in obj.Entities)
    {
        cbLID.Items.Add(item.lecturerID + " - " + item.lfirstName + " " + item.llastName);
    }
}

【问题讨论】：

您在哪一方面有问题？
错误 1 未为“Private Sub LoadLecturer(obj As System.ServiceModel.DomainServices.Client.LoadOperation(Of Web.Lecture))”的参数“obj”指定参数。 C:\Users\Carson\documents\visual studio 2010\Projects\LotusUniversity\LotusUniversity\Views\Home.xaml.vb 13 50 LotusUniversity
从这一行开始 context.Load(context.GetLecturesQuery(), LoadLecturer, Nothing)

标签： c# vb.net domaincontext

【解决方案1】：

鉴于评论，听起来不是方法本身导致您悲伤，而是您如何调用它 - 因为在原始代码中您使用的是方法组转换。我怀疑它很简单：

context.Load(context.GetLecturesQuery(), AddressOf LoadLecturer, Nothing)

【讨论】：

非常感谢。这非常有用。

【解决方案2】：

点击这个链接for the VB.NET converter这就是我得到的:)

Private Sub LoadLecturer(obj As LoadOperation(Of tblLecturer))
For Each item As var In obj.Entities
    cbLID.Items.Add(Convert.ToString(item.lecturerID) & " - " & Convert.ToString(item.lfirstName) & " " & Convert.ToString(item.llastName))
Next
End Sub

【讨论】：

我也在使用这个转换器但是有一个错误来自var。有什么想法吗？

【解决方案3】：

Private Sub LoadLecturer(obj As LoadOperation(Of tblLecturer))
    For Each item As var In obj.Entities
        cbLID.Items.Add(Convert.ToString(item.lecturerID) & " - " & Convert.ToString(item.lfirstName) & " " & Convert.ToString(item.llastName))
    Next
End Sub

【讨论】：

我也在使用这个转换器但是有一个错误来自var。有什么想法吗？