Visual Basic Script Spielereien 2

petertreter7 · 03/07/2013, 10:46

Vorwort:
JA, dieses Tutorial gibt es noch auf anderen Seiten, allerdings habe ich das Tutorial dort auch veröffentlicht und ich habe es selbständig verfasst. Ich bin kein Profiprogrammierer und behaupte so etwas auch nicht, aber ich spiele ab und zu Mal mit Visual Basic Script rum und wollte euch deswegen mein ''Wissen'' nicht vorenthalten.

Das Tutorial:
Heute möchte ich euch zeigen wie ihr mit Visual Basic Script ein PopUp mit den Funktionen Ja,Nein und Cancel machen könnt.

Als erstes wieder ein neues Textdokument erstellen:
Rechtsklick auf Desktop->Neu->Textdokument

Also wir fangen wieder mit der Variabel an:

Code:

dim a

Dann müssen wir sagen was die Variabel den machen soll:

Code:

dim a a = msgbox

Msgbox heisst Messagebox.
Jetzt müssen wir eingeben was den bei dem PopUp stehen soll:

Code:

dim a a = msgbox ("Und geht es euch gut?")

So jetzt kommt der neue Teil!
Ihr wollt ja jetzt das man auf Ja, Nein oder Cancel klicken kann!
Dafür braucht man die Konstante vbyesnocancel
Hier der Code wie ihr die Konstante einbaut:

Code:

dim a a = msgbox ("Geht es euch gut?", vbyesnocancel, "geht es gut?")

Der Teil "geht es gut?" ist der Titel von dem PopUp.
Es ist wichtig das ihr vbyesnocancel NICHT in solche Gänsefüße (") setzt!
Jetzt müssen wir bestimmen was passiert wenn man JA,NEIN oder CANCEL drückt!
Für die Option JA müssen wir if a = 6 then setzen!
6 then steht für JA!
Also der Code würde so aussehen:

Code:

dim a a = msgbox ("Geht es euch gut?", vbyesnocancel, "geht es gut?")

if a = 6 then msgbox "Das finde ich aber schön :D"

Der Code wird jetzt noch nicht gehen.
Dazu später mehr.
Jetzt sagen wir was passiert wenn wir auf NEIN klicken.
Dazu brauchen wir elseif a = 7 then
wobei 7 then für NEIN steht.
Der Code sieht dann so aus:

Code:

dim a a = msgbox ("Geht es euch gut?", vbyesnocancel, "geht es gut?")

if a = 6 then msgbox "Das finde ich aber schön :D"

elseif a = 7 then msgbox "Das ist aber Schade :("

Der Code geht immer noch nicht!
Jetzt müssen wir angeben was passieren soll wenn man auf CANCEl klickt das machen wir mit
elseif a = 2 then
2 steht für ... Genau CANCEL

Code:

dim a a = msgbox ("Geht es euch gut?", vbyesnocancel, "geht es gut?")

if a = 6 then msgbox "Das finde ich aber schön :D"

elseif a = 7 then msgbox "Das ist aber Schade :("

elseif a = 2 then msgbox "-.- wieso gehst du schon?"

So jetzt fehlt noch eine kleine Sache:
Wir müssen das IF beenden das machen wir mit end if
Code:

Code:

dim a 

a = msgbox ("Geht es euch gut?", vbyesnocancel, "geht es gut?")

if a = 6 then msgbox "Das finde ich aber schön :D"

elseif a = 7 then msgbox "Das ist aber Schade :("

elseif a = 2 then msgbox "-.- wieso gehst du schon?"

end if

Schlusswort:
Dankeschön für's Lesen und ich hoffe, dass es euch gefallen hat.

Assault IX · 03/14/2013, 22:36

Auch ein Gutes Tutorial.

Mr.____ · 03/14/2013, 22:46

Super , mehr mehr ! (Y)

~~TheAwesomeness~~ · 03/30/2013, 16:24

Hab's geblickt