View text
| Info | |
|---|---|
| Author | Vinam |
| Date added | 2003-03-25 |
| Last modified | 2003-03-25 |
Visual Basic voor absolute beginners
Dit is een inleiding in het programma Visual Basic 6.0, voor absolute beginners. Hier worden de belangrijkste functies, variabelen en commando's uitgelegd.
Als je het programma opent, komt er een menuutje dat vraagt met wat voor een project je wilt maken. Kies hier gewoon de standaardoptie, een .exe bestand. Er wordt nu meteen een standaardform geopent. De linkerbalk is de toolbox. Kijk eens naar de knoppen hierop. De eerste is aangeklikt. In deze optie heb je gewoon een muispijltje.
Pak nu de knop eronder, die met de A. Dit is een label. Zet er eens eentje neer op je form. Dit doe je door te slepen. Als je label geplaatst is, staat in de balk rechts (properties) Caption geselecteerd. Hier kan je de tekst die op een knop of label staat veranderen. Verander de tekst eens in iets leuks. Als je dit gelukt is, selecteer dan het hele form, ook hier kan je bij Caption wat leuks invullen.
Klik nu op de afspeelknop (driehoekje) in het midden van de balk boven. Nu zie je je vorm, met je tekst erin.
OK, je hebt wat gemaakt, maar er gebeurd niks. Daar gaan we nu wat aan doen!
Zet bij het label een knop. Dit doe je door de knopknop aan te klikken, die zit ook in de toolbox. Verander de Caption in bijvoorbeeld: Klik hier!
Dubbelklik nu op de knop. Nu kom je bij het eigenlijke programmeerscherm. Hier kan je code invoeren.
De tekst die er al staat is:
Private Sub Command1_Click()
End Sub
Oftewel: Hier komt de code tussen, die uitgevoerd word als je op je knop klikt. (deze knop heet Command1, dit kan je terugvinden in de propertiesbalk bij (Name)).
Zet tussen de code die er al staat de volgende regel:
MsgBox ("Hallo!")
Je gebruikt ALTIJD aanhalingstekens, behalve als je een variabele gebruikt (wat dit is komt later wel).
Run je programma nu weer (driehoekje). Als je op je knop drukt, krijg je nu een boodschap: Hallo!
Gefeliciteerd! Je eerste code werkt!
Zet nu op een nieuwe regel onder de oude MsgBox nog een paar regels:
MsgBox ("Doei!")
End
Je code is nu:
Private Sub Command1_Click()
MsgBox ("Hallo!")
MsgBox ("Doei!")
End
End Sub
Voer je programma nog eens uit. Zoals je ziet, krijg je nu eerst 2 boodschappen, waarna het programma wordt afgesloten.
OK, nu gaan we om de naam van de lezer vragen, en de lezer begroeten. Dit doen we door zijn / haar naam op te slaan in een variabele, een String. Een string kan cijfers en letters bevatten.
Ook moet de naam ergens ingevult worden, dit doen we met het commando InputBox(). Breidt je code uit tot het volgende:
Dim Naam As String
Private Sub Command1_Click()
MsgBox ("Hallo!")
Naam = InputBox("Hoe heet je?", "Naam", "Piet")
MsgBox ("Welkom, " & Naam)
MsgBox ("Doei!")
End
End Sub
Je ziet dat ik "Dim Naam As String" boven de code van de knop type, en dat er een lijn tussen verschijnt. Dit betekent dat Naam ook in andere knoppen of labels van hetzelfde Form gebruikt kan worden.
Naam = InputBox("Hoe heet je?", "Naam", "Piet")
Dit lijkt moeilijker dan het is. Hier staat dat wat je invult als antwoord op de vraag als Naam wordt herkent en opgeslagen.
De code voor een InputBox is:
InputBox("Vraag?","Titel schermpje","standaardwaarde")
Als je dit uitvoert, zie je wel wat ik hier precies mee bedoel.
Nu heb je een simpel programmaatje geschreven, dat om je naam vraagt, en je begroet. De volgende keer meer.