Calculator ng BMI: 6 na Hakbang

2024 May -akda: John Day | [email protected]. Huling binago: 2024-01-30 13:13

Ang pangalan ko ay Umair Bin Asim. Ako ay isang mag-aaral ng Global Perspective, ginagawa ang aking mga antas ng O. Ang proyektong ito ay bahagi ng isang kampanya sa kamalayan na kasalukuyang ginagawa ko at ng aking mga kamag-aral. Kinikilala namin ang labis na timbang bilang isang tumataas na problema sa buong mundo at hinihikayat ang mga tao na labanan ang labis na timbang bago ito humantong sa isang pangunahing sakuna sa lipunan. Ang proyektong ito ay isa sa aming maraming mga kampanya sa kamalayan.

Ang calculator ng BMI, ay upang payagan ang mga tao na mas madali sa pagkalkula ng kanilang index ng mass ng katawan at pagtukoy kung ang mga ito ay napakataba. Ang calculator na ginawa namin ay nakatakda sa mga pamantayan ng asosasyong pangkalusugan ng amerikano. Ang layunin ng pag-post na ito ay upang payagan ang mga tao na hindi lamang gumawa ng isang calculator ngunit upang payagan din ang mga tao na baguhin ang kanilang mga calculator sa kung ano man ang kanilang pambansang pamantayan.

Hakbang 1: Lumilikha ng isang Bagong Project sa Visual Studio

1. buksan ang visual studio
2. mag-click sa bagong proyekto
3. piliin ang application ng mga balo na form
4. palitan ang pangalan ng proyekto sa "BMI calculator"
5. i-save ang proyekto at alalahanin ang lokasyon (nai-save ko ito sa isang hiwalay na drive)

Hakbang 2: Dalawang Seksyon

may dalawang seksyon sa application ng Visual studio windows form

1) Form1.vb [Disenyo]

dito nilikha mo ang GUI

2) Form1.vb

dito isinusulat mo ang iyong programa

maaari mong piliin ang mga tab sa pamamagitan ng pagpili sa mga ito

Hakbang 3: Idisenyo ang Interface (mga label at Textboxes)

sa hakbang na ito kailangan mong idisenyo ang interface ng gumagamit ng graphics.

1. pumili ng mga label mula sa toolbox na magagamit (kung hindi mo makita ang tool box pindutin ang Ctrl + Alt + x)
2. i-drag ang label sa form at ayusin ang mga ito sa kanan. kailangan namin ng tatlong label
3. ayusin ang mga label sa kaliwa
4. mag-click sa mga label at sa pagbabago ng mga pag-aari Autosize to FALSE, papayagan kang baguhin ang laki ng label.

5. mag-click sa mga label at sa mga pag-aari baguhin ang teksto sa "taas", "timbang", "iyong BMI", ayon sa pagkakabanggit.

6. maaari mo ring baguhin ang iba pang setting sa mga pag-aari tulad ng kulay at 3D na epekto.
7. i-drag ang tatlong mga kahon ng teksto mula sa toolbox at ihanay ang mga ito sa kaliwang parallel sa mga label
8. mag-click sa textbox at sa mga pag-aari baguhin ang mga setting ng pangalan sa "txtheight", "txtweight", "txtresults"
9. maaari mo ring baguhin ang iba pang setting sa mga pag-aari tulad ng kulay at 3D na epekto.
10. lumikha ng isang huling textbox at ihanay ito sa ibaba, pangalanan ang text box na "txtcomment", magbibigay ito ng isang resulta sa batayan ng mga taong BMI dahil ang pag-unawa mula sa mga numero lamang ay maaaring maging mahirap.

11. Ang pagbabago ng pangalan ay mahalaga dahil tatawagin natin ang mga textbox na ito sa aming programa, kung nais mong maglagay ng anumang iba pang pangalan dapat mong baguhin ang pangalan ng na-refer na pindutan sa programa din. (ang mga pangalan ay ayon sa aking programa)

Hakbang 4: Idisenyo ang Interface (mga pindutan)

ilagay ang mga pindutan sa pamamagitan ng pagkaladkad sa mga ito mula sa toolbox at ihanay ang mga ito bilang ipinakita sa larawan

habang ang pindutan ay napili baguhin ang pangalan sa pindutan sa mga pag-aari, at maaari mo ring baguhin ang setting ng teksto.

• lumikha ng isang pangalan ng pindutan na "btncalc", na may teksto na "kalkulahin ang BMI"
• lumikha ng isang pangalan ng pindutan na "btnclear", na may teksto na "malinaw"
• lumikha ng isang pangalan ng pindutan na "btnexit", na may teksto na "exit"
• lumikha ng isang pangalan ng pindutan na "btnabout", na may teksto na "alamin ang tungkol sa amin"
• lumikha ng isang pangalan ng pindutan na "btnhlp", na may teksto na "kailangan ng tulong?" (hindi ko ito nagamit at iniwan itong libre kung nais mong magdagdag ng isang pindutan ng tulong)

ihanay ang mga pindutan sa form na GUI ayon sa iyong nababagay

Ang pagbabago ng pangalan ay mahalaga dahil tatawagin natin ang mga pindutan na ito sa aming programa, kung nais mong maglagay ng anumang iba pang pangalan dapat mong baguhin ang pangalan ng na-refer na pindutan sa programa din. (ang mga pangalan ay ayon sa aking programa)

Hakbang 5: Pag-program ng Iyong Calculator

Pormularyo ng Pangkalahatang Klase1

Pribadong Sub btncalc_Click (nagpadala Bilang System. Object, e Bilang System. EventArgs) Humahawak btncalc. Click

Dim taas Bilang Dobleng = 0 'lumilikha ng variable na pinangalanang taas Dim timbang Bilang Dobleng = 0' lumilikha ng variable na pinangalanang timbang Dim BMI Bilang Dobleng = 0 'lumilikha ng variable na pinangalanang BMI

txtresults. Txt = ""

taas = Dobleng. Parse (txtheight. Txt) 'nagbabasa ng mga bilang mula sa text box txtheight at nai-save ito sa kani-kanilang timbang na timbang = Dobleng. Parse (txtweight. Txt)' nagbabasa ng mga bilang mula sa text box na txtweight at nai-save ito sa kani-kanilang variable na taas = taas * 0.0254 'ginawang taas ang metro sa timbang = bigat * 0.4535924' binago ang timbang sa taas na kilo = taas * taas 'mga parisukat na helt at nai-save ito sa variable na taas

Kung ((taas <= 0) O (bigat <= 0)) Kung gayon 'suriin ang bisa upang matiyak na hindi likas na data ay hindi naipasok sa paglilinis () MsgBox ("mangyaring ipasok ang mga makatotohanang halaga") Exit Sub End Kung

BMI = pagkalkula ng timbang / taas 'ng BMI

Ang BMI = Format (BMI, "0.00") 'nagsusulat ng BMI sa dalawang decimal placee txtresults. Txt = BMI' nagsusulat ng BMI sa textbox txtresults txtcomment. Txt = "" 'nag-iwan ng komento sa textbox upang payagan ang data entry

Kinakalkula ang kondisyon ayon sa BMI

Kung ang BMI <18.5 Kung gayon ang kondisyon ay maaaring mag-iba sa iyong bansa

txtcomment. Txt = "ikaw ay nasa ilalim ng timbang"

ElseIf ((BMI> = 18.5) At (BMI 24.9) At (BMI 29.9 Pagkatapos ng txtcomment. Txt = "napakataba mo, mangyaring mag-ingat" Tapusin Kung

Wakas Sub

Pribadong Sub btnexit_Click (nagpadala Bilang System. Object, e Bilang System. EventArgs) Humahawak btnexit. Click

Isara ang () 'pagpapaandar para sa exit End SubPribadong Sub btnclear_Click (nagpadala Bilang System. Object, e Bilang System. EventArgs) Humahawak sa btnclear. Click cleanup () 'tumatawag sa sub routine na paglilinis End Sub Sub cleanup ()' nililinis ang bawat textbox txtcomment. Txt = "" txtheight. Clear () txtweight. Clear () txtresults. Txt = "" txtheight. Focus () End Sub

Pribadong Sub btnabout_Click (nagpadala Bilang System. Object, e Bilang System. EventArgs) Humahawak btnabout. Click

'ito ang mensahe na ipinakita sa isang hiwalay na msgbox

'maaari kang magdagdag ng anumang bagay na gusto mo pagkatapos ng "=" sign sa ibaba ngunit dapat ay nasa pagitan ito ng mga double comma ("")

Dim message as String = "Ang Software na Ito Ay Ginawa Ng Umair Bin Asim Para Sa Sake Ng Awtomatikong Kamalayan Sa Kalusugan." & vbNewLine & "Isang Daigdig na Malawakang Pagtaas sa Bilang ng Mga Masigang Tao Ay Pinukaw Ang Isang Panic sa Kalusugan Habang Ang Bilang Ng Mga Kaso Ng Mga Sakit sa Puso At Ang Diabetes Ay Nagtaas." & vbNewLine & "Sa kabila ng Lahat Ng Ito Isang Malaking Bilang Ng Mga Taong Hindi Malaman Kung O Hindi Sila Napakataba O Paano Ito Kakayanin." & vbNewLine & "Bilang Tugon Sa Na Kami Ay Gumawa Ng Isang Calculator Upang Matukoy Ang Iyong BMI At Kung Hindi Ka Ba Napakataba." & vbNewLine & "Ang Mga Pamantayang Ito ay Ayon sa The American Heart Association."

MsgBox (mensahe)

Tapusin ang Sub Pribadong Sub btnhlp_Click (nagpadala Bilang System. Object, e Bilang System. EventArgs) Humahawak btnhlp. I-click ang 'magdagdag ng anumang mensahe na nais mong isulat sa pagitan ng ""' walang laman ito sa ngayon Dim madalian_message Bilang String = ""

MsgBox (urgent_message)

Wakas SubPagtatapos ng Klase

Hakbang 6: Binabati ang Iyong Progamming Tapos Na

maaari mo nang kalkulahin ang iyong BMI at alam mo kung paano i-edit ang iyong software ayon sa gusto mo

upang i-play ang software pindutin ang berdeng arrow sa itaas na bar o pindutin lamang ang F5 enjoy!

para sa iyong kaginhawaan nai-post namin ang aming sariling calculator (handa nang gawin) pati na rin ang programa (sa isang.txt file)