Yahoo Answers is shutting down on May 4th, 2021 (Eastern Time) and beginning April 20th, 2021 (Eastern Time) the Yahoo Answers website will be in read-only mode. There will be no changes to other Yahoo properties or services, or your Yahoo account. You can find more information about the Yahoo Answers shutdown and how to download your data on this help page.
Trending News
Giải giúp mình câu hỏi VB này với!>>?
phần giao diện:
tính tổng phân số.
nhập vào số n, tính tổng các phân số từ 1/1+1/2+1/3+...+1/n
nhập số vào textbox txtnhapson.text, kết quả hiển thị ở txtKQ.text
Nhấn vào button Kết Quả để tính.
(quachvanbang@yahoo.com)
3 Answers
- King BoyLv 51 decade agoFavorite Answer
Thực sự đây không phải là vấn đề về ngôn ngữ mà là thuật toán, thuật toán này thì có gì đâu, nói thật chắc bạn không chuyên về tin, thậm chí là newbie 100% và nguy hiểm hơn là hình như bạn còn không học lý thuyết trước khi thực hành, ù ù cạc cạc, chưa có tư duy lập trình, nếu cứ thế này sẽ rất nguy hiểm. Có thể nói đây chỉ là 1 ví dụ rất cơ bản khi bạn được học vòng lặp For của bất kì ngôn ngữ nào chứ không riêng gì VB, tốt nhất bạn đọc lại lý thuyết và tự làm lấy đi. Nếu không được chắc bạn không có năng khiếu tin rồi, chuyển ngành gấp OK !
- Long Quang PhamLv 51 decade ago
t thấy câu hỏi lâu
chắc bạn làm đc rùi
t chỉ code cho ai chưa làm đc thui nha
Private Sub Command1_Click()
Dim i, n As Integer
txtKQ.Text = 0
n = txtnhapson.Text
For i = 1 To n
txtKQ.Text = txtKQ.Text + 1 / i
Next i
End Sub
