snowangle987 > 11-06-12, 10:05 PM
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 Subhondatron > 11-06-12, 11:32 PM
Noname > 12-06-12, 10:58 AM
(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 modulesTa xem xét vòng lặp.
VD: Kết quả là bao nhiêu khi chạy ''thủ tục'' dưới đây:
A.6Mã: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
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 !