比如
Try
Dim obj = client.GetObject(bucketName, objectName)
Using requestStream = obj.Content
Dim buf As Byte() = New Byte(1023) {}
Dim fs = File.Open(downloadFilename, FileMode.OpenOrCreate)
Dim len = 0
While (CSharpImpl.__Assign(len, requestStream.Read(buf, 0, 1024))) <> 0
fs.Write(buf, 0, len)
End While
fs.Close()
End Using
Console.WriteLine("Get object succeeded")
Catch ex As Exception
msgbox(CExp("Get object failed. {0}", ex.Message))
End Try
http://converter.telerik.com/