Skapa ett BMI-räknare som visar ditt Body Mass Index på datorn i stället för att använda en online- version eller göra matten för hand kräver en minsta kunskap om programmering och tillgång till programmeringsverktyg , såsom Visual Basic , Visual Basic.Net eller ett mer komplicerat språk . För lekmän är det gratis Microsoft Visual Basic Express ett sätt att skapa den här räknaren . Saker du behöver
Microsoft Visual Basic Express
Visa fler instruktioner
1
Öppna Visual Basic Express , klickar du på " Nytt projekt " välj " Windows-program " som typ , name it " BMI Calculator " och klicka på " OK . " Ändra egenskapen Text av formuläret i panelen Egenskaper längst ned till höger på skärmen för att " BMI -kalkylatorn . "
2
Skapa två etiketter på formuläret som visas genom att dubbelklicka på etiketten verktyget i verktygslådan till vänster , identifierad med ett stort " A " och sedan upprepa denna process . Klicka och dra varje etikett nu på formen så att man verkar i den andra .
3
Skapa två textrutor på samma sätt , denna gång dubbelklicka på " Textruta " verktyg . Placera en ruta bredvid varje etikett . Skapa en kommandoknapp genom att dubbelklicka på " knappen " verktyg och placera det under etiketterna .
4
Skapa en tredje etikett som i steg 2 och placera det bredvid kommandot knappen . Ställ in storleken på de första två etiketter i panelen Egenskaper till höger på skärmen med en bredd på 180 och en höjd av 25 . Håll tredje etiketten samma höjd , men gör bredden 150 .
5
Ändra texten egenskapen av den översta etiketten att läsa " Ange din vikt i pounds " och texten egenskapen hos den andra etiketten läs " Ange din längd i inches . " Ta bort texten för tredje etiketten och gör namnet " BMIResult . " Ändra text-egenskapen för knapp för att läsa " Beräkna ".
6
Dubbelklicka på " Beräkna" för att öppna koden fönstret och skriv in följande kod mellan " Private Sub " och " End Sub " rader : Dim BMI SingleDim höjd som ShortDim Vikt Som ShortHeight = CShort ( Text2.Text ) Vikt = CShort ( Text1.Text ) BMI = ( vikt /( Height_Renamed * Height_Renamed ) ) * 703BMI = CSng ( BMI ) BMIResult . Text = " Ditt BMI är " & BMI.ToString ( " F1 " )
7
Testa programmet genom att trycka på " F5 " på funktionsknapparna . Resultatet bör dyka upp i det tomma utrymmet bredvid " Beräkna ". Om den gör det , tryck "Ctrl + S " för att spara . Om inte , gå tillbaka och kontrollera kodning och namn på etiketterna . Klicka sedan på " Skapa ". Nåla den resulterande EXE-fil till Start-menyn eller kopiera den till skrivbordet .
