Zum Inhalt springen

Der Visual Basic Thread


Tizzy

Empfohlene Beiträge

Wer hat mit Visual Basic bereits gearbeitet? Wer hat es vor?

Alles hier rein!!!!

Kurze Beschreibung:

 

Visual Basic [ˈvɪʒʊəl ˈbeɪsɪk] (Abk. VB) ist eine proprietäre objektorientierte Programmiersprache, deren neuere Versionen auf dem Microsoft .NET-Framework basieren. Um zwischen den alten, nicht vollständig objektorientierten, und den neuen, auf dem .NET-Framework basierenden Versionen zu unterscheiden, werden erstere bis inklusive Visual Basic 6.0 als Visual Basic Classic, die letzteren hingegen als Visual Basic .NET bezeichnet.

(Quelle: Wikipeia)

Hier könnt ihr auch Anwendungen, die ihr mit Visual Basic erstellt habt reinstellen.

Link zu diesem Kommentar
Auf anderen Seiten teilen

Sooo Leute, ich und mein Freund brauchen Ideen. Brauch jemand vielleicht etwas? Bitte nichts zu schweres und wir haben keinen Bock auf einen Browser, weil ihr von denen schon zich verschiedene gemacht haben.

Danke schonmal im Vorraus für eure Ideen.

Link zu diesem Kommentar
Auf anderen Seiten teilen

  • 2 Monate später...
  • 6 Monate später...

Hier übrigens mal ein KLEINER

Ausschnitt des Skripts:

 

If ComboBox1.Text = "Aatrox" Then

Label1.Visible = True

Label2.Visible = True

Label3.Visible = True

Label5.Visible = True

Label6.Visible = False

Label7.Visible = False

Label8.Visible = False

Label9.Visible = False

Label10.Visible = False

Label11.Visible = False

Label12.Visible = False

Label13.Visible = False

Label14.Visible = False

Label15.Visible = False

Label16.Visible = False

Label17.Visible = False

Label18.Visible = False

Label19.Visible = False

Label20.Visible = False

Label21.Visible = False

Label22.Visible = False

Label22.Visible = False

Label23.Visible = False

Label25.Visible = False

Label26.Visible = False

Label27.Visible = True

Label28.Visible = True

Label29.Visible = False

ElseIf ComboBox1.Text = "Ahri" Then

Label1.Visible = True

Label2.Visible = True

Label3.Visible = True

Label5.Visible = False

Label6.Visible = True

Label7.Visible = False

Label8.Visible = False

Label9.Visible = False

Label10.Visible = False

Label11.Visible = False

Label12.Visible = False

Label13.Visible = False

Label14.Visible = False

Label15.Visible = False

Label16.Visible = False

Label17.Visible = False

Label18.Visible = False

Label19.Visible = False

Label20.Visible = False

Label21.Visible = False

Label22.Visible = False

Label22.Visible = False

Label23.Visible = False

Label25.Visible = False

Label26.Visible = False

Label27.Visible = True

Label28.Visible = True

Label29.Visible = False

ElseIf ComboBox1.Text = "Akali" Then

Label1.Visible = True

Label2.Visible = True

Label3.Visible = True

Label5.Visible = False

Label6.Visible = False

Label7.Visible = True

Label8.Visible = False

Label9.Visible = False

Label10.Visible = False

Label11.Visible = False

Label12.Visible = False

Label13.Visible = False

Label14.Visible = False

Label15.Visible = False

Label16.Visible = False

Label17.Visible = False

Label18.Visible = False

Label19.Visible = False

Label20.Visible = False

Label21.Visible = False

Label22.Visible = False

Label22.Visible = False

Label23.Visible = False

Label25.Visible = False

Label26.Visible = False

Label27.Visible = True

Label28.Visible = True

Label29.Visible = False

ElseIf ComboBox1.Text = "Alistar" Then

Label1.Visible = True

Label2.Visible = True

Label3.Visible = False

Label5.Visible = False

Label6.Visible = False

Label7.Visible = False

Label8.Visible = True

Label9.Visible = False

Label10.Visible = False

Label11.Visible = False

Label12.Visible = False

Label13.Visible = False

Label14.Visible = False

Label15.Visible = False

Label16.Visible = False

Label17.Visible = False

Label18.Visible = False

Label19.Visible = False

Label20.Visible = False

Label21.Visible = False

Label22.Visible = False

Label22.Visible = False

Label23.Visible = False

Label25.Visible = False

Label26.Visible = False

Label27.Visible = True

Label28.Visible = True

Label29.Visible = False

ElseIf ComboBox1.Text = "Amumu" Then

Label1.Visible = True

Label2.Visible = True

Label3.Visible = True

Label5.Visible = False

Label6.Visible = False

Label7.Visible = False

Label8.Visible = False

Label9.Visible = True

Label10.Visible = False

Label11.Visible = False

Label12.Visible = False

Label13.Visible = False

Label14.Visible = False

Label15.Visible = False

Label16.Visible = False

Label17.Visible = False

Label18.Visible = False

Label19.Visible = False

Label20.Visible = False

Label21.Visible = False

Label22.Visible = False

Label22.Visible = False

Label23.Visible = False

Label25.Visible = False

Label26.Visible = False

Label27.Visible = True

Label28.Visible = True

Label29.Visible = False

ElseIf ComboBox1.Text = "Anivia" Then

Label1.Visible = True

Label2.Visible = True

Label3.Visible = True

Label5.Visible = False

Label6.Visible = False

Label7.Visible = False

Label8.Visible = False

Label9.Visible = False

Label10.Visible = True

Label11.Visible = False

Label12.Visible = False

Label13.Visible = False

Label14.Visible = False

Label15.Visible = False

Label16.Visible = False

Label17.Visible = False

Label18.Visible = False

Label19.Visible = False

Label20.Visible = False

Label21.Visible = False

Label22.Visible = False

Label22.Visible = False

Label23.Visible = False

Label25.Visible = False

Label26.Visible = False

Label27.Visible = True

Label28.Visible = True

Label29.Visible = False

ElseIf ComboBox1.Text = "Annie" Then

Label1.Visible = True

Label2.Visible = True

Label3.Visible = True

Label5.Visible = False

Label6.Visible = False

Label7.Visible = False

Label8.Visible = False

Label9.Visible = False

Label10.Visible = False

Label11.Visible = True

Label12.Visible = False

Label13.Visible = False

Label14.Visible = False

Label15.Visible = False

Label16.Visible = False

Label17.Visible = False

Label18.Visible = False

Label19.Visible = False

Label20.Visible = False

Label21.Visible = False

Label22.Visible = False

Label22.Visible = False

Label23.Visible = False

Label25.Visible = False

Label26.Visible = False

Label27.Visible = True

Label28.Visible = True

Label29.Visible = False

ElseIf ComboBox1.Text = "Ashe" Then

Label1.Visible = True

Label2.Visible = True

Label3.Visible = True

Label5.Visible = False

Label6.Visible = False

Label7.Visible = False

Label8.Visible = False

Label9.Visible = False

Label10.Visible = False

Label11.Visible = False

Label12.Visible = True

Label13.Visible = False

Label14.Visible = False

Label15.Visible = False

Label16.Visible = False

Label17.Visible = False

Label18.Visible = False

Label19.Visible = False

Label20.Visible = False

Label21.Visible = False

Label22.Visible = False

Label22.Visible = False

Label23.Visible = False

Label25.Visible = False

Label26.Visible = False

Label27.Visible = True

Label28.Visible = True

Label29.Visible = False

ElseIf ComboBox1.Text = "Blitzcrank" Then

Label1.Visible = True

Label2.Visible = True

Label3.Visible = True

Label5.Visible = False

Label6.Visible = False

Label7.Visible = False

Label8.Visible = False

Label9.Visible = False

Label10.Visible = False

Label11.Visible = False

Label12.Visible = False

Label13.Visible = True

Label14.Visible = False

Label15.Visible = False

Label16.Visible = False

Label17.Visible = False

Label18.Visible = False

Label19.Visible = False

Label20.Visible = False

Label21.Visible = False

Label22.Visible = False

Label22.Visible = False

Label23.Visible = False

Label25.Visible = False

Label26.Visible = False

Label27.Visible = True

Label28.Visible = True

Label29.Visible = False

ElseIf ComboBox1.Text = "Brand" Then

Label1.Visible = True

Label2.Visible = True

Label3.Visible = True

Label5.Visible = False

Label6.Visible = False

Label7.Visible = False

Label8.Visible = False

Label9.Visible = False

Label10.Visible = False

Label11.Visible = False

Label12.Visible = False

Label13.Visible = False

Label14.Visible = True

Label15.Visible = False

Label16.Visible = False

Label17.Visible = False

Label18.Visible = False

Label19.Visible = False

Label20.Visible = False

Label21.Visible = False

Label22.Visible = False

Label22.Visible = False

Label23.Visible = False

Label25.Visible = False

Label26.Visible = False

Label27.Visible = True

Label28.Visible = True

Label29.Visible = False

EndIf

 

Ich kann den Text nicht länger als 20.000 Zeichen machen, deswegen so "wenig".

Bearbeitet von Tizzy
Link zu diesem Kommentar
Auf anderen Seiten teilen

Erstelle ein Benutzerkonto oder melde Dich an, um zu kommentieren

Du musst ein Benutzerkonto haben, um einen Kommentar verfassen zu können

Benutzerkonto erstellen

Neues Benutzerkonto für unsere Community erstellen. Es ist einfach!

Neues Benutzerkonto erstellen

Anmelden

Du hast bereits ein Benutzerkonto? Melde Dich hier an.

Jetzt anmelden
×
×
  • Neu erstellen...