我有一个使用linq的c#代码,它在c#中工作得很好,但我需要转换现在的代码到vb和我不是很擅长vb。我试过使用一些免费的在线转换器和我发现的一些程序,但它们都不起作用,我试着到处寻找如何做到这一点,但没有答案为我工作,所以如果有人能帮助我,那就太好了。
我的代码的linq部分是这样的:var query = from log in wts
join user in share on log.Substring(51, log.Length - 51).TrimEnd(trim).ToLower() equals user.Substring(0, user.IndexOf(" ")).TrimEnd(trim).ToLower()
select new { log, user };
foreach (var lognum in query)
{
lines.Add(lognum.log + lognum.user);
}
非常感谢帮助我的人
编辑我已经尝试了一些(这是我在网上或在一些免费转换器)
Dim query = From log In wtsJoin user In share On log.Substring(51, log.Length - 51).TrimEnd(trim).ToLower() = user.Substring(0, user.IndexOf(vbTab)).TrimEnd(trim).ToLower()New From { _
log, _
user _
}
For Each lognum As var In query
lines.Add(lognum.log + lognum.user)
Next
Dim query = From log In wts
Join user In share
On log.Substring(51, log.Length - 51).TrimEnd(trim).ToLower() Equals user.Substring(0, user.IndexOf(vbTab)).TrimEnd(trim).ToLower()
Select log & user
或者使用扩展方法
Dim query = wts.Join(share,
Function(log) log.Substring(51, log.Length - 51).TrimEnd(trim).ToLower(),
Function(user) user.Substring(0, user.IndexOf(vbTab)).TrimEnd(trim).ToLower(),
Function(log, user) log & user)
如果示例中的lines
是List(Of String)
类型,则将查询转换为列表
Dim lines As List(Of String) = query.ToList()