2010-03-07 63 views
0

所有自動在線轉換器都無法轉換此代碼。不幸的是,我對C#的簡短知識也讓我失望。該代碼來源於一個博客,鏈接從another of my questions將C#中的代碼片段轉換爲VB.NET

這是C#中的代碼片段;我現在已經在VB.NET(刪除了一些內聯的東西);但是,

Dim virtualFileDataObject = New VirtualFileDataObject() 
    Dim vf As New VirtualFileDataObject.FileDescriptor() 

    vf.Name = "abc.txt" 
    vf.StreamContents = ?? 

    Using webc As New WebClient() 
     Dim data = webc.DownloadData("http://www.google.com") 
     stream??.Write(data, 0, data.Length) 
    End Using 

    virtualFileDataObject.SetData(vf) 

您的幫助將不勝感激!

回答

0

StreamContents正在使用VB.NET不支持的匿名方法進行設置(但它在VB.NET 10中會在.NET 4.0中出現)。我可以建議的下一件最好的事情是:

vf.StreamContents = AddressOf(MyStreamContents) 

Public Sub MyStreamContents(ByVal stream As <Whatever the type is>) 

    Using webc As New WebClient() 
     Dim data = webc.DownloadData("http://www.google.com") 
     stream.Write(data, 0, data.Length) 
    End Using 

End Sub 
+0

酷,現在行動(的)是有道理的 - 一個代表。 我該如何將URL參數傳遞給MyStreamContents,以代替硬編碼的Google URL? – 2010-03-07 11:59:50

+0

您可以使用在Sub之外聲明的變量,例如字段或全局變量。 – 2010-03-07 13:01:36