Đá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
Photo [Thủ Thuật] Code chia sẽ hàng thừa Phung Duc 2 39 6 Giờ trước
Bài mới nhất: Phung Duc
Question [Help] Link tất các table trong một file.mdb bằng VBA MinhnHang 6 147 29-11-16, 05:18 PM
Bài mới nhất: MinhnHang
  Tránh xung đột dữ liệu trong access quocdung9999 16 1,689 23-11-16, 11:13 AM
Bài mới nhất: quocdung9999
  [Hỏi] Kết nối nhiều lần hay kết nối 1 lần trong ADO ưu điểm hơn Minh Tiên 1 117 10-11-16, 10:41 AM
Bài mới nhất: maidinhdan
  Summary bằng VBA trong MS Access. MinhnHang 6 316 08-11-16, 08:36 AM
Bài mới nhất: MinhnHang

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ơ