Visual Basic - Lab 8

Uppgift 1:
Du ska göra en lab med variabler och konstanter.

1. Lägg ut en etikett (Label), en textruta (TextBox) och en kommandoknapp på formuläret
   
   
2. Ta bort texten ut textrutan och texten från etiketten så att dessa visas tomma

Du ska deklarera en modulär variabel som heter Ålder och är av datatypen Long.

2. Gå in i kodrutan under formuläret och öppna General i listrutan Procedures och skriv in programkoden:
   Dim Ålder As Long
   
   
3. Spara som Ålder

Gör nu som ovan men nu ska du deklarera en Constant i stället.

4. Deklarera nu en konstant som följer:
   Const DagarÅr=365.25.
   
   
5. Spara som Nu

Du skapa en till modulär variabel. 

6. Gör som tidigare och skriv in under General
   Dim Weeks As Long
   
   
7. Gå in under kodfönstret för formuläret och skriv:
   Weeks = DagarÅr/7
   
   
8. Spara

9. Öppna kodfönstret igen
   
   
10. Ta bort allt text under Text1
    
    
11. I etiketten tar du bort texten under Caption
    
    
12. Under Text1 väljer du Change i listrutan Procedure
    
    
13. Skriv in följande programkod under Text1
    Ålder = Text1.Text
    
    
14. Välj Command1 i listrutan Object och Click i Procedure
    
    
15. Skriv in denna kod under Command1:
    Label1.Caption=Ålder*DagarÅr
    
    
16. Provkör nu programmet
    
    
17. Skriv in ett tal i textrutan och klicka på knappen

Du ska nu kunna se hur många dagar det är på det antal år du angivit i textrutan.

18. Prova med din egen ålder
    
    
19. Spara som Min Ålder