Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Giúp giải thích code tính toán trong modules
#1
Em sắp phải thi trắc nghiệm access cơ bản và nâng cao. Có 1 số bài tập tính toán trong phần module mà em ko biết làm mong mọi người giúp đỡ em cách tính toán nhanh các bài tập trong phần modules
VD: Kết quả là bao nhiêu khi chạy ''thủ tục'' dưới đây:
Mã:
Sub Test()
Dim I As Integer
Dim S As Integer  
   For I = 1 To 5 Step 2
        S = 1
        S = S + I
    Next
MsgBox S
End Sub
A.6
B.5.
C.4
D.7
Những bài dạng như thế này e toàn phải chép code vào access để tìm kết quả. Bài trên kết quả ra 6 nhưng em ko biết làm cách nào giải nhanh để ra đúng kết quả. Mong mọi người giải thích chi tiết giúp e. Em xin chân thành cảm ơn !
Chữ ký của snowangle987 Xin chào, mình là snowangle987, Tham gia http://thuthuataccess.com/forum từ ngày 19-04 -12.
Reply
Những người đã cảm ơn
#2
For I = 1 To 5 Step 2
i chạy từ 1 đến 5 với bước nhảy bằng 2. Tức giá trị nhận được của i=(1,3,5)
* Vì phần khai báo được mặt định là by reg nên giá trị nhận được của S=(2,4,6)
Chương trình kết thúc sẽ nhận giá trị cuối cùng bằng 6.

Theo mình nghĩ là thế!
Chữ ký của hondatron Xin chào, mình là hondatron, Tham gia http://thuthuataccess.com/forum từ ngày 29-09 -11.
Reply
Những người đã cảm ơn Noname
#3
(11-06-12, 10:05 PM)snowangle987 Đã viết: Em sắp phải thi trắc nghiệm access cơ bản và nâng cao. Có 1 số bài tập tính toán trong phần module mà em ko biết làm mong mọi người giúp đỡ em cách tính toán nhanh các bài tập trong phần modules
VD: Kết quả là bao nhiêu khi chạy ''thủ tục'' dưới đây:
Mã:
Sub Test()
Dim I As Integer
Dim S As Integer  
   For I = 1 To 5 Step 2
        S = 1
        S = S + I
    Next
MsgBox S
End Sub
A.6
B.5.
C.4
D.7
Những bài dạng như thế này e toàn phải chép code vào access để tìm kết quả. Bài trên kết quả ra 6 nhưng em ko biết làm cách nào giải nhanh để ra đúng kết quả. Mong mọi người giải thích chi tiết giúp e. Em xin chân thành cảm ơn !
Ta xem xét vòng lặp.
For I= 1 to 5 Step 2 có nghĩa là lặp lại tính toán tăng dần I mỗi lần 2 giá trị, cho tới khi nào I lớn hơn 5.
Lần 1: I = 1
S=1
S= S+I => S= 1+1 =2
Next ' Tăng I lên 2 giá trị =>I=3

Lần 2
I=3
S=1
S=S+I => S= 1+3=4
Next ' Tăng I lên 2 giá trị I= 3+2=5

Lần 3
I=5
S=1
S=S+I =>S=5+1 =6
Next 'Tăng I lên 2 , giá trị I =5+2=7>5 Thoát khỏi vòng lặp

Như vậy sau vòng Lặp, giá trị của S=6 và sẽ hiện lên khi gọi hàm msgbox là 6
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn snowangle987


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Sử dụng Class Module và Kết nối dữ liệu SQL SERVER trong Access VBA lehongduc 61 20,003 18-06-17, 08:49 AM
Bài mới nhất: lehongduc
  [Help] Tính ngày đầu và kết thúc của một tháng HoangManh 15 806 25-04-17, 10:03 PM
Bài mới nhất: maidinhdan
  [Giúp] lấy đường dẫn tương đối cho các Shell dieuchinhlu 2 2,103 26-03-17, 12:09 AM
Bài mới nhất: phungminhluan
  [Hỏi] Đóng Access khi máy tính chuyển sang standby Phung Duc 3 187 23-03-17, 10:10 PM
Bài mới nhất: ongke0711
  Hướng Dẫn [Video] Hướng dẫn sử dụng Class Modules maidinhdan 2 191 20-03-17, 12:24 AM
Bài mới nhất: bvchauthanh

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ