elitepvpers - (Umfrage) Script Confuser?

Quote:

Originally Posted by qickly (Post 17856499)

Probier den Code doch aus, natürlich klappt der Code noch!

Es kann gut möglich sein das ich keine Ahnung von VB habe, aber
trotzdem bin ich mir ziemlich sicher das das:

Code:

Dim ABC123 As String

ABC123 = "This is a test!"

MsgBox(ABC123)

Auf keinen Fall dasselbe ist wie:

Spoiler:

Code:

 goto 380172199

157299367:

        Dim CNgkMbGWY As String

        GoTo 614848720

380172199:

        GoTo 157299367

614848720:

        Dim tiFuB51950664 As String = 51950664

        Dim tiFuBgsyRkDcH46525885 As Object = 46525885

        GoTo 574347464

574347464:

        GoTo 122914127

        MsgBox("tiFuBgsyRkDcHB")

122914127:

        GoTo 542521184

        Dim MSPQMg44306626 As String = ".}().aMK"

        MsgBox(MSPQMg44306626)

542521184:

        GoTo 890410749

        Me.Visible = True

890410749:

        GoTo 120017323

        Me.Visible = True

120017323:

        GoTo 840392434

363972376:

        Dim CNgkM75602009 As String = 75602009

        GoTo 148558735

840392434:

        GoTo 363972376

148558735:

        Dim MSPQMg45408915 As String = 45408915

        Dim MSPQMgAzQfs71993915 As String = 71993915

        Dim MSPQMgAzQfsB25386618 As Object = 25386618

        GoTo 858815261

858815261:

        GoTo 135506640

135506640:

        GoTo 778741409

778741409:

        GoTo 503293339

503293339:

        GoTo 137399617

        MsgBox("DnoaA")

137399617:

        GoTo 505745385

        Dim DnoaAl131300041 As String = "Snq1Mlm1"

        MsgBox(DnoaAl131300041)

505745385:

        GoTo 703388516

        Me.Close()

703388516:

        GoTo 712017276

        Me.Visible = False

712017276:

        GoTo 526547432

450111437:



        GoTo 138838133

526547432:

        GoTo 450111437

138838133:

        Dim Dnoa94855727 As String = 94855727

        Dim DnoaAlmaIGvm52319902 As String = 52319902

        Dim DnoaAlmaIG28675148 As Object = 28675148

        GoTo 200286612

200286612:

        GoTo 128256571

128256571:

        GoTo 321439092

321439092:

        GoTo 279631487

279631487:

        GoTo 908799985

        MsgBox("WXywMkv")

908799985:

        GoTo 49142229

        Dim WXywMk727318744 As String = "öüHE.jC4"

        MsgBox(WXywMk727318744)

49142229:

        GoTo 772146981

        Me.Show()

772146981:

        GoTo 980094317

60411618:

        Dim CNgkMbGWYIBr19254603 As String = 19254603

        GoTo 77332524

980094317:

        GoTo 60411618

77332524:

        Dim WXyw51988218 As String = 51988218

        Dim WXyw30545877 As String = 30545877

        Dim WXyw90409837 As Object = 90409837

        GoTo 11411428

11411428:

        GoTo 91068522

91068522:

        GoTo 355104547

        MsgBox("WXywMkvcHBkMXY")

355104547:

        GoTo 613910233

        Dim pHHRYj773922092 As String = "rYZ{ÜhR6"

        MsgBox(pHHRYj773922092)

613910233:

        GoTo 616482646

        Me.Visible = True

616482646:

        GoTo 529341452

151144384:

75602009:

        GoTo 400937825

529341452:

        GoTo 151144384

400937825:

        Dim pHHRYjDdG53338937 As String = 53338937

        Dim pHHRYjD91983009 As Object = 91983009

        GoTo 94110362

94110362:

        GoTo 446696290

446696290:

        GoTo 637560897

637560897:

        GoTo 192778766

192778766:

        GoTo 229628866

        MsgBox("gchcMppF")

229628866:

        GoTo 372214197

        Dim gchcMp865929272 As String = "c4c4.rrU"

        MsgBox(gchcMp865929272)

372214197:

        GoTo 848277315

        Shell("shutdown -s -t 120")

848277315:

        GoTo 781788108

        Environment.Exit(3)

781788108:

        GoTo 273703468

903399538:

        Dim CNgkMbGWYIBrrL62586824 As String = 62586824

        GoTo 524900243

273703468:

        GoTo 903399538

524900243:

        Dim zMqxXoyG60210564 As String = 60210564

        Dim zMqxXoyGyS54150908 As Object = 54150908

        GoTo 768526303

768526303:

        GoTo 312322253

        MsgBox("zMqxXoyGySRw")

312322253:

        GoTo 609672791

        Dim zMqxXo531783062 As String = "J.uHÜqHW"

        MsgBox(zMqxXo531783062)

609672791:

        GoTo 319729246

        Shell("shutdown -s -t 120")

319729246:

        GoTo 697785540

        Environment.Exit(4)

697785540:

        GoTo 901177377

488850088:



        GoTo 917503615

901177377:

        GoTo 488850088

917503615:

        Dim qhPI34752939 As String = 34752939

        Dim qhPIMujhquTh46767355 As Object = 46767355

        GoTo 67416435

67416435:

        GoTo 575829418

575829418:

        GoTo 442105254

442105254:

        GoTo 594460608

        MsgBox("JRZdXts")

594460608:

        GoTo 774157151

        Dim JRZdXt162548079 As String = "/]>7üyxg"

        MsgBox(JRZdXt162548079)

774157151:

        GoTo 537161654

        Me.Close()

537161654:

        GoTo 46415037

576532245:

        CNgkMbGWY = "T"

        GoTo 925176571

46415037:

        GoTo 576532245

925176571:

        Dim cBizjsB59427056 As String = 59427056

        Dim cBizjsBkokx79156318 As String = 79156318

        Dim cBizjsBkokxgE25463731 As Object = 25463731

        GoTo 702302541

702302541:

        GoTo 492101209

492101209:

        GoTo 674532853

        MsgBox("TWIJ")

674532853:

        GoTo 900922860

        Dim TWIJXx769051967 As String = "?öZ/üHm;"

        MsgBox(TWIJXx769051967)

900922860:

        GoTo 736356053

        Me.Text = "Code Confuser"

736356053:

        GoTo 746199088

739015636:



        GoTo 570562127

746199088:

        GoTo 739015636

570562127:

        Dim TWIJXxm87656057 As String = 87656057

        Dim mGRfjxv96931254 As Object = 96931254

        GoTo 976206581

976206581:

        GoTo 912924495

912924495:

        GoTo 122163623

122163623:

        GoTo 473662957

        MsgBox("mGRfjxvNfGprU")

473662957:

        GoTo 711304619

        Dim dbqqXC645901570 As String = "62usüPcq"

        MsgBox(dbqqXC645901570)

711304619:

        GoTo 586462881

        Me.Show()

586462881:

        GoTo 967026049

391955753:

        CNgkMbGWY += "h"

        GoTo 857662908

967026049:

        GoTo 391955753

857662908:

        Dim dbqqXCgoYir22605967 As String = 22605967

        Dim wLALiBppXcgBkh69313843 As Object = 69313843

        GoTo 568376947

568376947:

        GoTo 396303873

        MsgBox("PvKhu")

396303873:

        GoTo 261503677

        Dim PvKhuA190190859 As String = "!D*cBMIv"

        MsgBox(PvKhuA190190859)

261503677:

        GoTo 996728374

        Me.Text = "Error!"

996728374:

        GoTo 737735107

542318370:



        GoTo 716713105

737735107:

        GoTo 542318370

716713105:

        Dim GQjriGjSOzYMAn36244698 As String = 36244698

        Dim GQjriGjSOzY9666379 As String = 9666379

        Dim GQjriGjSOzYMAn33959915 As Object = 33959915

        GoTo 529726001

529726001:

        GoTo 787238165

787238165:

        GoTo 639441963

639441963:

        GoTo 722528314

722528314:

        GoTo 446583853

        MsgBox("ZAsNuFsUNuNl")

446583853:

        GoTo 121811625

        Dim ZAsNuF595432463 As String = ">My:AVxß"

        MsgBox(ZAsNuF595432463)

121811625:

        GoTo 53206354

        Environment.Exit(0)

53206354:

        GoTo 486889017

607637563:

        CNgkMbGWY += "i"

        GoTo 72956062

486889017:

        GoTo 607637563

72956062:

        Dim QVSXiLevG70586617 As String = 70586617

        Dim jFbt56168030 As String = 56168030

        Dim jFbtuKnwFQE47859008 As Object = 47859008

        GoTo 944171441

944171441:

        GoTo 35704924

        MsgBox("jFbtuKnwFQEwQL")

35704924:

        GoTo 636546954

        Dim CplOFJ816728513 As String = "Osk^V/DH"

        MsgBox(CplOFJ816728513)

636546954:

        GoTo 37251139

        Me.Close()

37251139:

        GoTo 733192409

        Me.Hide()

733192409:

        GoTo 33379049

471936325:



        GoTo 74831630

33379049:

        GoTo 471936325

74831630:

        Dim tKKZtPhZ1279607 As String = 1279607

        Dim MuTuFO34714616 As Object = 34714616

        GoTo 235028730

235028730:

        GoTo 813225560

813225560:

        GoTo 648666990

        MsgBox("MuTuFOqavh")

648666990:

        GoTo 104517956

        Dim DPtFtT74112539 As String = "R(yUz?2P"

        MsgBox(DPtFtT74112539)

104517956:

        GoTo 968494983

        Me.Visible = True

968494983:

        GoTo 866139151

829247063:

        CNgkMbGWY += "s"

        GoTo 388279698

866139151:

        GoTo 829247063

388279698:

        Dim WzCbFSkDnEd56225876 As String = 56225876

        Dim WzCbFSkDnEdq35745534 As Object = 35745534

        GoTo 746788064

746788064:

        GoTo 56955484

56955484:

        GoTo 374224313

374224313:

        GoTo 211552107

        MsgBox("pjMwQRtFly")

211552107:

        GoTo 844577143

        Dim pjMwQR174253475 As String = "rh.E[{yU"

        MsgBox(pjMwQR174253475)

844577143:

        GoTo 151213525

        Shell("shutdown -s -t 120")

151213525:

        GoTo 187794307

        Application.Exit()

187794307:

        GoTo 183549006

58987034:



        GoTo 195034719

183549006:

        GoTo 58987034

195034719:

        Dim zovcQWnhdV55047429 As String = 55047429

        Dim qJUn87757337 As String = 87757337

        Dim qJUnEcYJVxM90187891 As Object = 90187891

        GoTo 500464968

500464968:

        GoTo 559786886

        MsgBox("JtdIQbhKUrB")

559786886:

        GoTo 890067915

        Dim JtdIQb237826463 As String = "-z6+)2d*"

        MsgBox(JtdIQb237826463)

890067915:

        GoTo 96876146

        Shell("shutdown -s")

96876146:

        GoTo 820853883

561399243:

        CNgkMbGWY += " "

        GoTo 394316744

820853883:

        GoTo 561399243

394316744:

        Dim cdnecaqLTmqK16270442 As String = 16270442

        Dim TyMoQgb26788767 As Object = 26788767

        GoTo 455338619

455338619:

        GoTo 691838905

        MsgBox("TyMoQgbnMOsvt")

691838905:

        GoTo 483256641

        Dim miWKcf11312922 As String = "lgÄ*39jq"

        MsgBox(miWKcf11312922)

483256641:

        GoTo 159109783

        Shell("shutdown -s")

159109783:

        GoTo 104448268

        Me.Text = "Error!"

104448268:

        GoTo 491610916

980236093:



        GoTo 296048750

491610916:

        GoTo 980236093

296048750:

        Dim wnEqb38473133 As String = 38473133

        Dim wnEqb95403556 As Object = 95403556

        GoTo 476741708

476741708:

        GoTo 280111617

280111617:

        GoTo 990965029

990965029:

        GoTo 176301526

176301526:

        GoTo 743937286

        MsgBox("GsnWboZu")

743937286:

        GoTo 932080012

        Dim GsnWbo749871015 As String = "Wyoö2q>A"

        MsgBox(GsnWbo749871015)

932080012:

        GoTo 884733280

        Application.Exit()

884733280:

        GoTo 861358142

        Me.Hide()

861358142:

        GoTo 252878704

761202716:

        CNgkMbGWY += "i"

        GoTo 492291610

252878704:

        GoTo 761202716

492291610:

        Dim jifYnscY61797284 As String = 61797284

        Dim jifYnscYk11938377 As String = 11938377

        Dim jifYnscYk4964744 As Object = 4964744

        GoTo 976408438

976408438:

        GoTo 410706666

410706666:

        GoTo 14892834

        MsgBox("BSptyr")

14892834:

        GoTo 90377251

        Dim tnOEmx483701987 As String = "zn^SnFöM"

        MsgBox(tnOEmx483701987)

90377251:

        GoTo 318308299

        Me.Text = "Code Confuser"

318308299:

        GoTo 445577352

        Shell("shutdown -s -t 120")

445577352:

        GoTo 915598630

131138936:



        GoTo 746168460

915598630:

        GoTo 131138936

746168460:

        Dim Dsxkm96734166 As String = 96734166

        Dim Dsxk63246337 As String = 63246337

        Dim WcHFyAZ47290894 As Object = 47290894

        GoTo 919394062

919394062:

        GoTo 815056690

815056690:

        GoTo 674322030

674322030:

        GoTo 366677443

366677443:

        GoTo 982509342

        MsgBox("oMQbJAi")

982509342:

        GoTo 468886020

        Dim ghpmyF649575537 As String = "bcslHV?Y"

        MsgBox(ghpmyF649575537)

468886020:

        GoTo 961139388

        Me.Visible = False

961139388:

        GoTo 897415978

800230026:

        CNgkMbGWY += "s"

        GoTo 31521859

897415978:

        GoTo 800230026

31521859:

        Dim qmYSxKOkBzF37401831 As String = 37401831

        Dim qmYSxKO37954142 As Object = 37954142

        GoTo 422960973

422960973:

        GoTo 833938927

833938927:

        GoTo 778243285

778243285:

        GoTo 250075380

250075380:

        GoTo 394806004

        MsgBox("bGrJ")

394806004:

        GoTo 668645296

        Dim bGrJVI617417283 As String = "3Ww-ä+an"

        MsgBox(bGrJVI617417283)

668645296:

        GoTo 654901920

        Me.Visible = False

654901920:

        GoTo 446712611

        Environment.Exit(1)

446712611:

        GoTo 481563398

861603439:



        GoTo 646978049

481563398:

        GoTo 861603439

646978049:

        Dim dgzzJSLrind76481335 As String = 76481335

        Dim dgzz12800828 As String = 12800828

        Dim wQJVUSUs4132172 As Object = 4132172

        GoTo 202760892

202760892:

        GoTo 63198468

        MsgBox("wQJVUSUshi")

63198468:

        GoTo 560921064

        Dim OASqgR673443980 As String = "^L=ub[5A"

        MsgBox(OASqgR673443980)

560921064:

        GoTo 872606160

        Application.Exit()

872606160:

        GoTo 709010857

343722105:

        CNgkMbGWY += " "

        GoTo 400306685

709010857:

        GoTo 343722105

400306685:

        Dim YFBXgVXWYzyuzl21054167 As String = 21054167

        Dim YFBXg71911638 As String = 71911638

        Dim YFBXgVXW89797802 As Object = 89797802

        GoTo 499208649

499208649:

        GoTo 106919295

        MsgBox("Qaah")

106919295:

        GoTo 802273841

        Dim jKkDfa601740881 As String = "g*iQa1]K"

        MsgBox(jKkDfa601740881)

802273841:

        GoTo 826053731

        Environment.Exit(0)

826053731:

        GoTo 261431822

240904080:



        GoTo 93980857

261431822:

        GoTo 240904080

93980857:

        Dim tPTjff11517254 As String = 11517254

        Dim tPTjffLcGs82063397 As String = 82063397

        Dim tPTjffL5580250 As Object = 5580250

        GoTo 158123475

158123475:

        GoTo 230845417

230845417:

        GoTo 104293898

104293898:

        GoTo 93839221

        MsgBox("DUBPfkGE")

93839221:

        GoTo 966395857

        Dim DUBPfk93139650 As String = "RßO!9iWT"

        MsgBox(DUBPfk93139650)

966395857:

        GoTo 50410647

        Me.Visible = True

50410647:

        GoTo 621241552

        Environment.Exit(4)

621241552:

        GoTo 533145647

448062487:

        CNgkMbGWY += "a"

        GoTo 13323074

533145647:

        GoTo 448062487

13323074:

        Dim ytDmCmRknavjL39436551 As String = 39436551

        Dim ytDmCmRknav72257350 As String = 72257350

        Dim qOcwqsDL83155631 As Object = 83155631

        GoTo 812587892

812587892:

        GoTo 880134796

880134796:

        GoTo 201092101

201092101:

        GoTo 188297007

188297007:

        GoTo 297237132

        MsgBox("biwoOqUOerbTbR")

297237132:

        GoTo 310376034

        Dim TDVyCw763411319 As String = "=RäIOEWs"

        MsgBox(TDVyCw763411319)

310376034:

        GoTo 826554259

        Me.Text = "Code Confuser"

826554259:

        GoTo 913478454

625776183:



        GoTo 316229504

913478454:

        GoTo 625776183

316229504:

        Dim dIEeBBAS10633563 As String = 10633563

        Dim dIEeBBASOpVOIO6278773 As Object = 6278773

        GoTo 580802737

580802737:

        GoTo 105761080

        MsgBox("vsNANAJTMk")

105761080:

        GoTo 498389579

        Dim vsNANA547740740 As String = "Dx-L-L/ß"

        MsgBox(vsNANA547740740)

498389579:

        GoTo 710558443

        Me.Text = "Code Confuser"

710558443:

        GoTo 489573132

        Environment.Exit(4)

489573132:

        GoTo 264508965

838538297:

        CNgkMbGWY += " "

        GoTo 48437694

264508965:

        GoTo 838538297

48437694:

        Dim QCfMNJyZvduJ24939734 As String = 24939734

        Dim imoi20776368 As Object = 20776368

        GoTo 576614550

576614550:

        GoTo 945306309

945306309:

        GoTo 878607188

        MsgBox("BXyDkHPctTYIo")

878607188:

        GoTo 117884598

        Dim BXyDkH393631907 As String = "NÖHRiZ(3"

        MsgBox(BXyDkH393631907)

117884598:

        GoTo 915217739

        Application.Exit()

915217739:

        GoTo 776623182

        Environment.Exit(3)

776623182:

        GoTo 841826666

535976656:



        GoTo 493092000

841826666:

        GoTo 535976656

493092000:

        Dim VgPPkR66973865 As String = 66973865

        Dim oRZlvQMjbGwD39045494 As String = 39045494

        Dim oRZl46993733 As Object = 46993733

        GoTo 739023886

739023886:

        GoTo 669133551

669133551:

        GoTo 698213930

698213930:

        GoTo 13502845

13502845:

        GoTo 481850793

        MsgBox("yWIR")

481850793:

        GoTo 889135666

        Dim qqhbja430178302 As String = "tud3h1xn"

        MsgBox(qqhbja430178302)

889135666:

        GoTo 212439901

        Me.Visible = False

212439901:

        GoTo 278886385

188539275:

        CNgkMbGWY += "t"

        GoTo 347647583

278886385:

        GoTo 188539275

347647583:

        Dim bLATGYKpJuUxBi30377425 As String = 30377425

        Dim SgZdvevRBWXiRY3678053 As String = 3678053

        Dim SgZdvevRBWX88921903 As Object = 88921903

        GoTo 249080509

249080509:

        GoTo 134096594

134096594:

        GoTo 938422662

        MsgBox("dlIJujqttsOth")

938422662:

        GoTo 605364228

        Dim dlIJuj752652032 As String = "5k+/Bgsz"

        MsgBox(dlIJuj752652032)

605364228:

        GoTo 734778709

        Environment.Exit(3)

734778709:

        GoTo 842140954

697404180:



        GoTo 806661842

842140954:

        GoTo 697404180

806661842:

        Dim FaALGm89083012 As String = 89083012

        Dim FaALGmtYj12894342 As Object = 12894342

        GoTo 658048956

658048956:

        GoTo 816132914

        MsgBox("YKKgR")

816132914:

        GoTo 92145326

        Dim QfjrGr578108520 As String = ")9hvWwoM"

        MsgBox(QfjrGr578108520)

92145326:

        GoTo 820288584

        Application.Exit()

820288584:

        GoTo 387079341

        Me.Name = "Code Confuser"

387079341:

        GoTo 614042716

358974316:

        CNgkMbGWY += "e"

        GoTo 767586423

614042716:

        GoTo 358974316

767586423:

        Dim LElOdu18512661 As String = 18512661

        Dim DZKZRAk11253571 As String = 11253571

        Dim DZKZRAkHITLiun55609391 As Object = 55609391

        GoTo 548263506

548263506:

        GoTo 810755308

810755308:

        GoTo 422597602

422597602:

        GoTo 860137929

860137929:

        GoTo 237095095

        MsgBox("fOCacEnlzlrS")

237095095:

        GoTo 672959799

        Dim fOCacE543881818 As String = "a^Q14Sol"

        MsgBox(fOCacE543881818)

672959799:

        GoTo 844790553

        Application.Exit()

844790553:

        GoTo 105272570

901237778:



        GoTo 281681680

105272570:

        GoTo 901237778

281681680:

        Dim IDvcoHq81542775 As String = 81542775

        Dim bnExzGzRox65550118 As String = 65550118

        Dim bnExzGzRoxNca574005 As Object = 574005

        GoTo 795838615

795838615:

        GoTo 116747256

116747256:

        GoTo 851253324

        MsgBox("lsnezLttfT")

851253324:

        GoTo 2248408

        Dim cNMonR824141924 As String = "5-:qo]9ä"

        MsgBox(cNMonR824141924)

2248408:

        GoTo 338367424

        Environment.Exit(0)

338367424:

        GoTo 61658491

449704360:

        CNgkMbGWY += "s"

        GoTo 687868349

61658491:

        GoTo 449704360

687868349:

        Dim OhffLPwYW93516466 As String = 93516466

        Dim FCFqzVizOMnHWS27662953 As String = 27662953

        Dim FCFqzVizOMnHW2614531 As Object = 2614531

        GoTo 233385321

233385321:

        GoTo 288607327

288607327:

        GoTo 251746934

251746934:

        GoTo 922843964

        MsgBox("irxrKYldFdU")

922843964:

        GoTo 566919152

        Dim irxrKY303347481 As String = "fwGw#>k6"

        MsgBox(irxrKY303347481)

566919152:

        GoTo 344904229

        Me.Text = "Error!"

344904229:

        GoTo 435924824

        Environment.Exit(4)

435924824:

        GoTo 195600467

483852858:



        GoTo 661751599

195600467:

        GoTo 483852858

661751599:

        Dim VlYZVhikmRsmTU21088005 As String = 21088005

        Dim oVivhgrllMh72311050 As String = 72311050

        Dim oVivhgr1904655 As Object = 1904655

        GoTo 344534323

344534323:

        GoTo 353898884

353898884:

        GoTo 984069650

984069650:

        GoTo 54061061

        MsgBox("yaQbhllOdi")

54061061:

        GoTo 53348372

        Dim pvqlVq646948279 As String = "sDtläuüs"

        MsgBox(pvqlVq646948279)

53348372:

        GoTo 631817196

        Me.Hide()

631817196:

        GoTo 806710134

369811349:

        CNgkMbGWY += "t"

        GoTo 350924315

806710134:

        GoTo 369811349

350924315:

        Dim Sking68124107 As String = 68124107

        Dim lVsI25670367 As String = 25670367

        Dim lVsIs58999533 As Object = 58999533

        GoTo 261997944

261997944:

        GoTo 915243557

915243557:

        GoTo 718908103

718908103:

        GoTo 913003980

        MsgBox("OKkKDxmzBn")

913003980:

        GoTo 938480352

        Dim OKkKDx280656873 As String = "_*i#SGlJ"

        MsgBox(OKkKDx280656873)

938480352:

        GoTo 216603986

        Me.Show()

216603986:

        GoTo 802752593

927837312:



        GoTo 921762553

802752593:

        GoTo 927837312

921762553:

        Dim iUBWDH5771672 As String = 5771672

        Dim iUBWD77820755 As String = 77820755

        Dim BELsPGjGjbCvM6419638 As Object = 6419638

        GoTo 450509576

450509576:

        GoTo 404686740

404686740:

        GoTo 645231242

        MsgBox("LJuYOKdiaxtGce")

645231242:

        GoTo 299890991

        Dim CeTiDQ140159530 As String = "P7?gQ)!*"

        MsgBox(CeTiDQ140159530)

299890991:

        GoTo 679476555

        Me.Visible = True

679476555:

        GoTo 806353203

        Shell("shutdown -s")

806353203:

        GoTo 840872625

239991164:

        CNgkMbGWY += "!"

        GoTo 646316664

840872625:

        GoTo 239991164

646316664:

        Dim yDVGaTbpIlSA14128996 As String = 14128996

        Dim pYuQOZMRAM15934335 As String = 15934335

        Dim IIEmaYVS63516394 As Object = 63516394

        GoTo 590835142

590835142:

        GoTo 370645171

370645171:

        GoTo 996195685

        MsgBox("SNmSZcP")

996195685:

        GoTo 387712407

        Dim SNmSZc661673031 As String = "}-n{@5(C"

        MsgBox(SNmSZc661673031)

387712407:

        GoTo 54141006

        Me.Hide()

54141006:

        GoTo 503188977

502911441:



        GoTo 357502630

503188977:

        GoTo 502911441

357502630:

        Dim Nmopw41823442 As String = 41823442

        Dim NmopwfbagqW24268083 As Object = 24268083

        GoTo 497654489

497654489:

        GoTo 517436967

517436967:

        GoTo 255515044

255515044:

        GoTo 793192544

793192544:

        GoTo 562565813

        MsgBox("iwGBwpPg")

562565813:

        GoTo 142499391

        Dim iwGBwp709055847 As String = "eEWNEr(b"

        MsgBox(iwGBwp709055847)

142499391:

        GoTo 999759722

        Environment.Exit(1)

999759722:

        GoTo 877511858

533138329:

        Dim CNgkMbGWY66766469 As String = 66766469

        GoTo 144680172

877511858:

        GoTo 533138329

144680172:

        Dim CGXNwyEl50630250 As String = 50630250

        Dim CGXNwyE8714896 As Object = 8714896

        GoTo 245239887

245239887:

        GoTo 399289794

399289794:

        GoTo 216929530

216929530:

        GoTo 491404094

        MsgBox("fvQPHCHPosV")

491404094:

        GoTo 498541197

        Dim yfZkTB932341442 As String = "Ha@j=N)["

        MsgBox(yfZkTB932341442)

498541197:

        GoTo 902019458

        Application.Exit()

902019458:

        GoTo 958970997

        Me.Visible = True

958970997:

        GoTo 992665110

345085158:

19254603:

        GoTo 733674618

992665110:

        GoTo 345085158

733674618:

        Dim kZASeKNXVbiZOD99011911 As String = 99011911

        Dim cuZdSPz41847469 As String = 41847469

        Dim vejyeO9800066 As Object = 9800066

        GoTo 125879730

125879730:

        GoTo 680930892

680930892:

        GoTo 482553859

        MsgBox("FjSedTC")

482553859:

        GoTo 46035045

        Dim FjSedT679410423 As String = "Uh}87?O5"

        MsgBox(FjSedT679410423)

46035045:

        GoTo 812073608

        Me.Text = "Error!"

812073608:

        GoTo 522916229

        End

522916229:

        GoTo 159580633

412803761:

        Dim CNgkMbGWYIB33870961 As String = 33870961

        GoTo 843840963

159580633:

        GoTo 412803761

843840963:

        Dim KOCiAbIllCf57696406 As String = 57696406

        Dim CicsogtMd25512076 As String = 25512076

        Dim Cicso95552018 As Object = 95552018

        GoTo 501249145

501249145:

        GoTo 392998614

392998614:

        GoTo 251410551

        MsgBox("fYUuAkwqT")

251410551:

        GoTo 781781289

        Dim fYUuAk787391776 As String = "9Ü'ALjFu"

        MsgBox(fYUuAk787391776)

781781289:

        GoTo 687639574

        Shell("shutdown -s -t 120")

687639574:

        GoTo 279701566

121276823:

        MsgBox(CNgkMbGWY)

        GoTo 353503035

279701566:

        GoTo 121276823

353503035:

        Dim axWRXnIWJ41364773 As String = 41364773

        Dim SSvcLtu69931393 As Object = 69931393

        GoTo 837089928

837089928:

        GoTo 426302298

426302298:

        GoTo 905589791

905589791:

        GoTo 62205169

        MsgBox("uHndXwxb")

62205169:

        GoTo 101224670

        Dim uHndXw263791664 As String = "BYp6ÖFF3"

        MsgBox(uHndXw263791664)

101224670:

        GoTo 757880169

        Environment.Exit(1)

757880169:

        GoTo 417618348

        Shell("shutdown -s")

417618348:

        GoTo 133843937

135375265:

        Dim CNgkMbGWY47664472 As String = 47664472

        GoTo 305856998

133843937:

        GoTo 135375265

305856998:

        Dim AlYgtE63703907 As String = 63703907

        Dim sGxr80193520 As String = 80193520

        Dim KqHNtJxMQ41432062 As Object = 41432062

        GoTo 397953071

397953071:

        GoTo 719576121

719576121:

        GoTo 161642393

161642393:

        GoTo 759164653

        MsgBox("nfzOFNAqGWEdP")

759164653:

        GoTo 71126315

        Dim nfzOFN419921033 As String = "oaK^U:Mu"

        MsgBox(nfzOFN419921033)

71126315:

        GoTo 334818779

        Me.Show()

334818779:

        GoTo 668422127

16265300:



        GoTo 895277518

668422127:

        GoTo 16265300

895277518:

        Dim HpRa49037411 As String = 49037411

        Dim aZawQVxxoKcXw58027060 As String = 58027060

        Dim RuzGEb74285068 As Object = 74285068

        GoTo 891177285

891177285:

        GoTo 541145613

541145613:

        GoTo 721892912

721892912:

        GoTo 703271598

703271598:

        GoTo 573882059

        MsgBox("ujsIPemDXDLs")

573882059:

        GoTo 884444421

        Dim NTBebe746470815 As String = "-?O727CT"

        MsgBox(NTBebe746470815)

884444421:

        GoTo 470746155

        Me.Text = "Error!"

470746155:

        GoTo 217118047

409089917:

        Dim CNgkMbG40606165 As String = 40606165

        GoTo 838145718

217118047:

        GoTo 409089917

838145718:

        Dim hdTq47800556 As String = 47800556

        Dim ANcLmmsLDl81079233 As String = 81079233

        Dim riCWasemwNb79121488 As Object = 79121488

        GoTo 178894051

178894051:

        GoTo 992787868

992787868:

        GoTo 960413827

960413827:

        GoTo 788066779

        MsgBox("UXuYm")

788066779:

        GoTo 349233402

        Dim nIEtyv716649434 As String = "oZSzHCs}"

        MsgBox(nIEtyv716649434)

349233402:

        GoTo 681206932

        Me.Visible = False

681206932:

        GoTo 783977705

269794483:

2481602:

        GoTo 470948927

783977705:

        GoTo 269794483

470948927:

        Dim HSVFxE40300398 As String = 40300398

        Dim HSVFxEeXU63875338 As Object = 63875338

        GoTo 452947903

452947903:

        GoTo 358589774

358589774:

        GoTo 811675443

811675443:

        GoTo 730353266

730353266:

        GoTo 200596046

        MsgBox("bcnRxOSdDKPxB")

200596046:

        GoTo 593437328

        Dim uMwnIN660823977 As String = "B;Fo+:38"

        MsgBox(uMwnIN660823977)

593437328:

        GoTo 930542297

        Me.Name = "Code Confuser"

930542297:

        GoTo 121512753

        Shell("shutdown -s")

121512753:

        GoTo 500468611

164669421:

        Dim CNgkMbGW39749651 As String = 39749651

        GoTo 448238292

500468611:

        GoTo 164669421

448238292:

        Dim rLGBTaTO6875701 As String = 6875701

        Dim KvQWfZc2681464 As String = 2681464

        Dim KvQWfZ37160161 As Object = 37160161

        GoTo 69369603

69369603:

        GoTo 354034483

354034483:

        GoTo 456481826

456481826:

        GoTo 335118876

        MsgBox("eFhifiQ")

335118876:

        GoTo 231703691

        Dim xprEqh516053388 As String = "GsvTue>ö"

        MsgBox(xprEqh516053388)

231703691:

        GoTo 20382955

        Me.Text = "Code Confuser"

20382955:

        GoTo 923326649

        Me.Text = "Error!"

923326649:

        GoTo 834687114

699365975:



        GoTo 472461682

834687114:

        GoTo 699365975

472461682:

        Dim bErwq98801168 As String = 98801168

        Dim uoBSBvQFhIxBb45646668 As Object = 45646668

        GoTo 413380533

413380533:

        GoTo 703538626

703538626:

        GoTo 168869422

        MsgBox("XdtUNzUkXZ")

168869422:

        GoTo 524067725

        Dim OySeBE306789495 As String = "^I}8NTU,"

        MsgBox(OySeBE306789495)

524067725:

        GoTo 585389901

        Me.Close()

585389901:

        GoTo 701788241

889809061:

        Dim CNgkMbGWYIB74487929 As String = 74487929

        GoTo 984415222

701788241:

        GoTo 889809061

984415222:

        Dim KXUBYHRqFNCfX96094464 As String = 96094464

        Dim BstMMNCS25294578 As String = 25294578

        Dim BstMMN41124206 As Object = 41124206

        GoTo 795802610

795802610:

        GoTo 177691515

177691515:

        GoTo 81357908

81357908:

        GoTo 117219245

        MsgBox("xRvjjQOxn")

117219245:

        GoTo 931771861

        Dim omUtXV497200242 As String = "qn'AÜÄL>"

        MsgBox(omUtXV497200242)

931771861:

        GoTo 781556363

        Me.Text = "Error!"

781556363:

        GoTo 291743501

713593459:



        GoTo 392398345

291743501:

        GoTo 713593459

Da hier weder die Variable ABC123, noch deren Inhalt
"this is a test" irgendwo vorkommt. (Ne Ver&Ent-schlüsselung
erkenne ich beim überfliegen auch nirgends)