C#代码更改为VB[英] C# code being changed to VB

本文是小编为大家收集整理的关于C#代码更改为VB的处理方法,想解了C#代码更改为VB的问题怎么解决?C#代码更改为VB问题的解决办法?那么可以参考本文帮助大家快速定位并解决问题。

问题描述

如何将此 C# 代码更改为 VB.Net

public static 列表<YouTubeInfo>LoadVideosKey(string keyWord){试试{var xraw = XElement.Load(string.Format(SEARCH,keyWord));var xroot = XElement.Parse(xraw.ToString());var links = (from item in xroot.Element("channel").Descendants("item")选择  YouTubeInfo{LinkUrl = item.Element("link").Value,EmbedUrl = GetEmbedUrlFromLink(item.Element("link").Value),ThumbNailUrl = GetThumbNailUrlFromLink(项目),}).Take(20);return links.ToList();}catch(异常 e){Trace.WriteLine(e.Message, "ERROR");}return null;}


我已经使用了 4 种不同的代码转换器加上我的,但我仍然得到同样的东西......这是我的代码......
公共 共享 功能 LoadVideosKey(keyWord As String) Asspan> List(Of YouTubeInfo)试试Dim xraw As Object = XElement.Load(String.Format(SEARCH, keyWord))Dim xroot As Object = XElement.Parse(xraw.ToString())Dim 链接 As Object = (From itemIn xroot.Element("channel").Descendants("item") YouTubeInfo() With { _Key .LinkUrl = item.Element("link").Value, _Key .EmbedUrl = GetEmbedUrlFromLink(item.Element("link").Value), _键 .ThumbNailUrl = GetThumbNailUrlFromLink(item) _}).Take(20)返回 links.ToList(Of YouTubeInfo)()Catch e As 异常Trace.WriteLine(e.Message, "ERROR")结束 试试返回 没有结束 功能


这是来自 Sasha 的 YouTube 查看器的代码,它是用 WPF 编码的.我正在将其更改为 WinForms 应用程序,这是我无法开始工作的唯一一段代码.

我知道"钥匙"这个词在转换后不应该在那里,删除后仍然不起作用.我遇到问题的主要代码区域是("Dim links As Object = .......")

提前感谢您的帮助...

推荐答案

Dim 链接As Object = (From item In xroot.Element("channel").Descendants("item")选择 新建 YouTubeInfo() With { _.LinkUrl = item.Element("link").Value, _.EmbedUrl = GetEmbedUrlFromLink(item.Element("link").Value), _.ThumbNailUrl = GetThumbNailUrlFromLink(item) _}).Take(20)

如果你不想,你可以使用这个网站进行转换亲手做.

http://www.developerfusion.com/tools/convert/csharp-to-vb/[^]

公开 共享 Function LoadVideosKey(keyWord As String) As 列表(Of YouTubeInfo)试试Dim xraw = XElement.Load(String.Format(SEARCH, keyWord))Dim xroot = XElement.Parse(xraw.ToString())Dim links = (From item In xroot.Element("channel").Descendants("item") YouTubeInfo() With { _Key .LinkUrl = item.Element("link").Value, _Key .EmbedUrl = GetEmbedUrlFromLink(item.Element("link").Value), _键 .ThumbNailUrl = GetThumbNailUrlFromLink(item) _}).Take(20)返回 links.ToList(Of YouTubeInfo)()Catch e As 异常Trace.WriteLine(e.Message, "ERROR")结束 试试返回 没有结束 功能

本文地址:https://www.itbaoku.cn/post/1355866.html

相关标签/搜索