Microsoft Visual Basic 6.0 is een ontwikkelomgeving die u kunt gebruiken om toepassingen met uitgebreide interactie met de gebruiker te creëren . In termen van dergelijke toepassingen , Visual Basic is verschillend van oudere programmeertalen zoals C , Visual Basic maakt snelle applicatieontwikkeling ( RAD ) . Een manier om het dit doet is door middel van een Form Designer die automatisch genereert programmacode op basis van controles u plaatsen op een gebruiker form.Beginning om code in Visual Basic schrijven is een eenvoudig proces , vooral als uw eerste programma speelt om Visual Basic 's kracht : snelle ontwikkeling vormen die samenwerken met gebruikers . Code een Countdown Timer
Probeer het coderen van een toepassing die een countdown timer simuleert . De gebruiker het aantal seconden het programma is om een timer in te stellen uit komt ; . Het programma doet het aftellen , de weergave van het aantal resterende seconden en een visuele waarschuwing op het einde van het aftellen
Om dit project te beginnen , het openstellen van de Visual Basic IDE ( Integrated Development Environment ) . Selecteer " Bestand " > " Nieuw " > " Windows Forms Application . " In het venster Form Designer , sleept u de volgende besturingselementen op het formulier van de toolbox . Sleept u eerst een tekstvak voor de gebruiker om het aantal seconden in te voeren af te tellen vanaf . Onder dat tekstvak plaats een andere voor het programma om de resterende seconden laten zien . Onder dat tweede tekstvak , plaats een knop voor de gebruiker om de timer te starten . Ook, sleept u een timer op het formulier . De gebruiker zal niet te zien deze controle , maar je code wel.
Verander de eigenschap text van de knop om "Start . " Zorg ervoor dat de zaak van elke letter overeenkomt met "Start . " U kunt het venster Eigenschappen openen met " View" > "Eigenschappen . "
Schrijven van het Programma
Nu dat u hebt ingesteld in de vorm , de code schrijven dat de vorm gebruikt voor communicatie met de gebruiker . Dubbelklik op de knop . De code-venster verschijnt , met de cursor in het lege functie Button1_Click . Deze functie wordt aangeroepen wanneer de knop van uw formulier de gebruiker op .
Het eerste deel van de volgende code stelt u het interval van de timer in milliseconden en start de timer door het instellen van de " Enabled " eigenschap . Deze acties gebeuren alleen als de tekst van de knop leest "Start . "
Private Sub Button1_Click ( ... [ argumenten voor de duidelijkheid weggelaten ] ) Als ( Button1.Text = " Start" ) ThennSecsLeft = CInt ( TextBox1.Text ) Button1.Text = " Stop" Timer1.Interval = 1000Timer1.Enabled = TrueElseButton1.Text = " Start" Timer1.Enabled = False End of IfEnd Sub
het laatste gedeelte van de code , van Else , behandelt het geval wanneer de timer is al actief . Het programma schakelt de timer door middel van haar " Enabled " eigendom en verandert de knop tekst om een herstart van het programma mogelijk te maken.
De Timer Event
Elk seconde ( 1000 milliseconden ) die passeert zorgt de Timer1_Tick functie uit te voeren . Uw app moet verschillende dingen doen in die functie : de gebruiker te vertellen hoeveel seconden blijven in de countdown en detecteert het einde van het aftellen , en als het aftellen is voltooid , schakelt u de timer en waarschuwen de gebruiker . De volgende code voltooit deze taken . Private Sub Timer1_Tick
( ... ) TextBox2.Text = nSecsLeftIf ( nSecsLeft = 0 ) ThenTimer1.Enabled = FalseMsgBox ( "Klaar ! " ) < Br
> Button1.Text = " Start" ElsenSecsLeft = nSecsLeft - 1 End
Als End Sub
Ren uw afgewerkte programma . Dan experimenteren . Bijvoorbeeld , code schrijven dat betekent iets anders dan weer een bericht .
|
