Pytanie : Konwertyta C# VB

Ive niektóre c# kod od ' http://www.c-sharpcorner. com/UploadFile/nipuntomar/FileUploadsilverlight03182009030537AM/FileUploadsilverlight.aspx' zagadnienie z the sekcja: -
c.OpenWriteCompleted += (nadawca, e) =>
{
PushData (dane, e.Result);
e.Result.Close ();
dane. Zakończenie ();
};

My opóźniony próba być ono przez kod zamiana narzędzie przy http://www.developerfusion .com/tools/convert/csharp-to-vb/, ale wciąż produkować błąd najwięcej z czego I załatwiać, ale wciąż the kawałek above.

I using the raiseevent kod, ale ono właśnie mówić końcówka oświadczenie oczekiwać - (

Any pomysł? 
(1):
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:

Imports System.IO
Import System
Import System.Net

Częściowy Społeczeństwo Klasa MainPage
    Dziedziczyć UserControl

    Jawny Okręt podwodny Nowy ()
        InitializeComponent ()
    Końcówka Okręt podwodny
    Intymny Okręt podwodny UploadFile (ByVal fileName Jako Sznurek, ByVal dane Strumień)
        Ciemnawy ub Jako Nowy UriBuilder ("http://localhost:3840/receiver.ashx ")
        ub. Zapytanie = String.Format ("filename= {(0)}", fileName)
        Ciemnawy c Jako Nowy WebClient
 	c.OpenWriteCompleted += Funkcja (nadawca, e)
        PushData (dane, e.Result)
        e.Result.Close ()
        dane. Zamykać ()
    Kończyć Okręt podwodny
	c.OpenWriteAsync (ub. Uri)
Końcówka Okręt podwodny

    Intymny Okręt podwodny PushData (ByVal wkład Jako Strumień, ByVal przesyłać Strumień)
        Ćmić odbojnica Jako Bajt () = Nowy Bajt (4095) {}
        Ćmić bytesRead Jako Integer

        Podczas Gdy (InlineAssignHelper (bytesRead, input. Czytać (odbojnica, (0), odbojnica. Długość))) <> (0)
            wydajność. Pisać (odbojnica, (0), bytesRead)
        Kończyć Podczas Gdy
    Kończyć Okręt podwodny
Kończyć Klasa

Odpowiedź : Konwertyta C# VB

Jeżeli ty chcieć "być" wtedy I myśleć ono musieć:
(1):
2:
3:
4:
5:
6:

        Ćmić c Jako Nowy WebClient
        AddHandler c.OpenWriteCompleted, Okręt podwodny (nadawca, e)
                                             PushData (dane, e.Result)
                                             e.Result.Close ()
                                             dane. Zamykać ()
                                         Kończyć Okręt podwodny
Inne rozwiązania  
 
programming4us programming4us