Mục lục:
- Bước 1: Tạo một dự án Visual Studio mới
- Bước 2: Hai phần
- Bước 3: Thiết kế giao diện (nhãn và hộp văn bản)
- Bước 4: Thiết kế Giao diện (các nút)
- Bước 5: Lập trình Máy tính của bạn
- Bước 6: Chúc mừng Progamming của bạn đã hoàn tất
Video: Máy tính BMI: 6 bước
2024 Tác giả: John Day | [email protected]. Sửa đổi lần cuối: 2024-01-30 13:33
Tên tôi là Umair Bin Asim. Tôi là một sinh viên của Global Perspective, đang thi các cấp độ O của tôi. Dự án này là một phần của chiến dịch nâng cao nhận thức mà tôi và các bạn cùng lớp của tôi hiện đang thực hiện. Chúng tôi công nhận béo phì là một vấn đề đang gia tăng trên toàn thế giới và đang khuyến khích mọi người chống lại bệnh béo phì trước khi nó dẫn đến một thảm họa xã hội lớn. Dự án này là một trong nhiều chiến dịch nâng cao nhận thức của chúng tôi.
Máy tính BMI cho phép mọi người dễ dàng hơn trong việc tính toán chỉ số khối cơ thể của họ và xác định xem họ có béo phì hay không. Máy tính mà chúng tôi đã thực hiện được thiết lập theo tiêu chuẩn của hiệp hội sức khỏe Hoa Kỳ. Mục đích của việc đăng bài này là để cho phép mọi người không chỉ tạo ra một máy tính mà còn cho phép mọi người sửa đổi máy tính của họ theo bất kỳ tiêu chuẩn quốc gia nào của họ.
Bước 1: Tạo một dự án Visual Studio mới
- mở studio trực quan
- nhấp vào dự án mới
- chọn ứng dụng biểu mẫu góa phụ
- đổi tên dự án thành "máy tính BMI"
- lưu dự án và ghi nhớ vị trí (tôi đã lưu nó trong một ổ đĩa riêng)
Bước 2: Hai phần
có hai phần trong ứng dụng biểu mẫu cửa sổ Visual studio
1) Form1.vb [Thiết kế]
tại đây bạn tạo GUI
2) Mẫu1.vb
ở đây bạn viết chương trình của bạn
bạn có thể chọn các tab bằng cách chọn trên chúng
Bước 3: Thiết kế giao diện (nhãn và hộp văn bản)
trong bước này, bạn cần thiết kế giao diện người dùng đồ họa.
- chọn nhãn từ hộp công cụ có sẵn (nếu bạn không tìm thấy hộp công cụ, hãy nhấn Ctrl + Alt + x)
- kéo nhãn vào biểu mẫu và sắp xếp chúng ở bên phải. chúng tôi cần ba nhãn
- sắp xếp các nhãn dọc theo bên trái
- nhấp vào nhãn và trong thuộc tính thay đổi Kích thước tự động thành FALSE, điều này sẽ cho phép bạn thay đổi kích thước nhãn.
-
nhấp vào nhãn và trong thuộc tính thay đổi văn bản thành "chiều cao", "cân nặng", "chỉ số BMI của bạn", tương ứng.
- bạn cũng có thể thay đổi cài đặt khác trong các thuộc tính như màu sắc và hiệu ứng 3D.
- kéo ba hộp văn bản từ hộp công cụ và căn chỉnh chúng dọc theo bên trái song song với các nhãn
- nhấp vào hộp văn bản và trong thuộc tính thay đổi cài đặt tên thành "txtheight", "txtweight", "txtresults"
- bạn cũng có thể thay đổi cài đặt khác trong các thuộc tính như màu sắc và hiệu ứng 3D.
- tạo một hộp văn bản cuối cùng và căn chỉnh nó ở dưới cùng, đặt tên cho hộp văn bản này là "txtcomment", điều này sẽ đưa ra kết quả dựa trên BMI của từng người vì việc hiểu một mình từ các con số có thể khó khăn.
- Thay đổi tên là điều cần thiết vì chúng tôi sẽ phải gọi các hộp văn bản này lên trong chương trình của mình, nếu bạn muốn đặt bất kỳ tên nào khác, bạn cũng phải thay đổi tên của nút được giới thiệu trong chương trình. (tên theo chương trình của tôi)
Bước 4: Thiết kế Giao diện (các nút)
đặt các nút bằng cách kéo chúng từ hộp công cụ và căn chỉnh chúng như hiển thị trong hình
trong khi nút được chọn, hãy thay đổi tên trên nút trong thuộc tính và bạn cũng có thể thay đổi cài đặt văn bản.
- tạo tên nút "btncalc", với văn bản "tính chỉ số BMI"
- tạo tên nút "btnclear", với văn bản "rõ ràng"
- tạo tên nút "btnexit", với văn bản "thoát"
- tạo tên nút "btnabout", với văn bản "tìm hiểu về chúng tôi"
- tạo tên nút "btnhlp", với dòng chữ "cần trợ giúp?" (Tôi chưa sử dụng cái này và nó được để miễn phí trong trường hợp bạn muốn thêm nút trợ giúp)
căn chỉnh các nút trong biểu mẫu GUI khi bạn thấy phù hợp
Thay đổi tên là điều cần thiết vì chúng tôi sẽ phải gọi các nút này lên trong chương trình của mình, nếu bạn muốn đặt bất kỳ tên nào khác, bạn cũng phải thay đổi tên của nút được giới thiệu trong chương trình. (tên theo chương trình của tôi)
Bước 5: Lập trình Máy tính của bạn
Public Class Form1
Private Sub btncalc_Click (sender As System. Object, e As System. EventArgs) Xử lý btncalc. Click
Dim height As Double = 0 'tạo biến có tên chiều cao Dim weight As Double = 0' tạo biến có tên weight Dim BMI As Double = 0 'tạo biến có tên BMI
txtresults. Text = ""
height = Double. Parse (txtheight. Text) 'đọc các số từ hộp văn bản txtheight và lưu nó vào trọng lượng biến tương ứng = Double. Parse (txtweight. Text)' đọc các chữ số từ hộp văn bản txtweight và lưu nó vào biến chiều cao tương ứng = chiều cao * 0,0254 'chuyển đổi chiều cao thành mét cân nặng = cân nặng * 0,4535924' chuyển đổi cân nặng thành kilôgam chiều cao = chiều cao * chiều cao 'bình phương vừa vặn và lưu thành chiều cao biến đổi
If ((height <= 0) Or (weight <= 0)) Then 'kiểm tra tính hợp lệ để đảm bảo dữ liệu không bình thường không được nhập vào cleanup () MsgBox ("vui lòng chèn giá trị thực") Thoát Sub End If
BMI = cân nặng / chiều cao 'tính toán chỉ số BMI
BMI = Định dạng (BMI, "0,00") 'ghi BMI thành hai vị trí thập phân txtresults. Text = BMI' ghi BMI trong hộp văn bản txtresults txtcomment. Text = "" 'để trống nhận xét hộp văn bản để cho phép nhập dữ liệu
'tính toán điều kiện theo BMI
Nếu BMI <18,5 thì tình trạng 'có thể khác nhau ở quốc gia của bạn
txtcomment. Text = "bạn thiếu cân"
ElseIf ((BMI> = 18,5) Và (BMI 24,9) Và (BMI 29,9 Thì txtcomment. Text = "bạn bị béo phì, hãy đề phòng" End If
Kết thúc Sub
Private Sub btnexit_Click (sender As System. Object, e As System. EventArgs) Xử lý btnexit. Click
Hàm Close () 'để thoát End SubPrivate Sub btnclear_Click (sender As System. Object, e As System. EventArgs) Xử lý btnclear. Click cleanup () 'gọi quy trình phụ dọn dẹp End Sub Sub cleanup ()' xóa từng hộp văn bản txtcomment. Text = "" txtheight. Clear () txtweight. Clear () txtresults. Text = "" txtheight. Focus () End Sub
Private Sub btnabout_Click (sender As System. Object, e As System. EventArgs) Xử lý btnabout. Click
'đây là thông báo được hiển thị trong một hộp thư riêng biệt
'bạn có thể thêm bất kỳ thứ gì bạn muốn sau dấu "=" bên dưới nhưng nó phải nằm giữa dấu phẩy kép ("")
Dim message As String = "Phần mềm này được tạo ra bởi Umair Bin Asim để nâng cao nhận thức xã hội về sức khỏe." & vbNewLine & "Sự gia tăng trên toàn thế giới về số lượng người béo phì đã khuấy động một sự hoảng loạn về sức khỏe khi số ca mắc bệnh tim và tiểu đường đang gia tăng." & vbNewLine & "Bất chấp tất cả những điều này, một số lượng lớn người dân không biết liệu họ có béo phì hay không hoặc làm thế nào để chống lại nó." & vbNewLine & "Đáp lại điều đó, chúng tôi đã tạo ra một máy tính để xác định chỉ số BMI của bạn và bạn có bị béo phì hay không." & vbNewLine & "Các tiêu chuẩn này theo Hiệp hội Tim mạch Hoa Kỳ."
MsgBox (tin nhắn)
End Sub Private Sub btnhlp_Click (sender As System. Object, e As System. EventArgs) Xử lý btnhlp. Nhấp vào 'thêm bất kỳ thư nào bạn muốn viết vào giữa "" "hiện tại nó đang trống Dim khẩn cấp_message As String =""
MsgBox (tin nhắn khẩn cấp)
Kết thúc SubKết thúc lớp học
Bước 6: Chúc mừng Progamming của bạn đã hoàn tất
bây giờ bạn có thể tính chỉ số BMI của mình và bạn biết cách chỉnh sửa phần mềm theo ý muốn của mình
để chơi phần mềm nhấn mũi tên xanh trên thanh trên hoặc chỉ cần nhấn F5 tận hưởng!
để thuận tiện cho bạn, chúng tôi đã đăng máy tính của riêng mình (đã được tạo sẵn) cũng như lập trình (trong tệp.txt)
Đề xuất:
Thiết lập Raspberry Pi 4 thông qua máy tính xách tay / máy tính bằng cáp Ethernet (Không có màn hình, Không có Wi-Fi): 8 bước
Thiết lập Raspberry Pi 4 thông qua máy tính xách tay / máy tính bằng cáp Ethernet (Không có màn hình, không có Wi-Fi): Trong phần này, chúng tôi sẽ làm việc với Raspberry Pi 4 Model-B RAM 1Gb để thiết lập. Raspberry-Pi là một máy tính bảng đơn được sử dụng cho mục đích giáo dục và các dự án tự làm với chi phí hợp lý, yêu cầu nguồn điện 5V 3A
Cách xây dựng máy tính chơi game hoặc máy tính cơ bản (Tất cả các thành phần): 13 bước
Làm thế nào để xây dựng một máy tính chơi game hoặc cơ bản (Tất cả các thành phần): Vì vậy, bạn muốn biết làm thế nào để xây dựng một máy tính? Trong Tài liệu hướng dẫn này, tôi sẽ dạy bạn cách xây dựng một máy tính để bàn cơ bản. Dưới đây là các bộ phận bắt buộc phải có: Bo mạch chủ Vỏ máy tính (Đảm bảo rằng đó là PGA nếu AMD và LGA nếu Intel) Quạt tản nhiệt cho Vỏ máy tính CPU Pow
Cách biến một chiếc máy tính xách tay hoặc máy tính xách tay cũ / hỏng thành một hộp đựng phương tiện: 9 bước
Làm thế nào để biến một chiếc máy tính xách tay hoặc máy tính xách tay cũ / hư hỏng thành một hộp phương tiện: Trong một thế giới mà công nghệ đang phát triển nhanh nhất so với chúng ta, các thiết bị điện tử yêu quý của chúng ta đều nhanh chóng trở nên lỗi thời. Có lẽ những con mèo yêu thương của bạn đã làm rơi máy tính xách tay của bạn trên bàn và màn hình bị vỡ. Hoặc có thể bạn muốn một hộp media cho TV thông minh
Cách gửi tệp lớn từ máy tính sang máy tính: 6 bước
Cách gửi tệp lớn từ máy tính sang máy tính: Kích thước tệp tiếp tục tăng kích thước khi công nghệ tiến bộ. Nếu bạn đang làm công việc sáng tạo, chẳng hạn như thiết kế hoặc mô hình hóa, hoặc chỉ là một người có sở thích, việc chuyển các tệp lớn có thể là một rắc rối. Hầu hết các dịch vụ email đều giới hạn kích thước tệp đính kèm tối đa trong khoảng 25
Giá đỡ máy tính xách tay không đắt tiền / Máy tính xách tay sang Bộ chuyển đổi máy tính để bàn: 3 bước
Giá đỡ máy tính xách tay / Máy tính xách tay sang Bộ chuyển đổi máy tính để bàn không đắt tiền: Tôi thấy mình đã sử dụng máy tính xách tay của mình trong thời gian dài. Nó sẽ khó chịu sau một thời gian. Bàn phím và màn hình lý tưởng nên tách biệt để giảm mỏi cổ khi sử dụng lâu. Nếu bạn là người dùng máy tính xách tay toàn thời gian, tôi khuyên bạn nên xây dựng