Vòng lặp Do-loop while không chạy được! (1 người xem)

[laulau]

E có 3 giá trị ô A1,A2,A3 chạy từ 1-4
vấn đề là e muốn
nếu kiểm tra : ô A1 = A2 = A3 = 2 thì < Khối lệnh>
còn khác thì : chạy F9 đến khi nào thì A1=A2=A3=2 thì dừng và thực hiện <Khối lệnh>
e viết nhưng chạy ko đc

ex: If A1 = 2 and A1 = A2 = A3 then

printout​

else
do

Calculate​

Loop while A1 = 2 and A1 = A2 =A3

printout​

End if​

 

[VetMini]

Nhiều người học lập trình cứ ngỡ cứ đem ký hiệu toán vào là máy tính sẽ hiểu.

Cách trình bày biểu thức A1 = A2 = A3 là ký hiệu toán học. VBA không hổ trợ cách này - nó vẫn hiểu nhưng không hiểu theo kiểu bạn nghĩ.

Viết lai cho rõ If (A1 = A2) And (A1 = A3)
Phép bằng có tính di truyền nên không cần And (A2 = A3)

 

[laulau]

vâng , do e viết tắt, ở đây e muốn hỏi :

Do
<khối lệnh>
Loop While (a = b) And (a = c)
vòng không lặp cho đến khi (a=b) and (a=c) mà nó lặp vô cùng !​

 

[VetMini]

vâng , do e viết tắt, ở đây e muốn hỏi :

Do
<khối lệnh>
Loop While (a = b) And (a = c)
vòng không lặp cho đến khi (a=b) and (a=c) mà nó lặp vô cùng !​

Lấy tờ giấy ra, viết câu này 100 lần: "đem bài đi hỏi người khác thì KHÔNG BAO GIỜ viết tắt. Viết tắt chỉ làm tốn thì giờ cho cả 2 bên"

Loop While (a = b) And (a = c) thì đương nhiên nếu điều kiện này thỏa nó cứ việc chạy tiếp.
Nếu muốn nó dừng ở điều kiện đó thì phải dùng Loop Until
(lấy từ điển ra tra định nghĩa While và Until)

 

[Hoang2013]

. . .ở đây em muốn hỏi :

Do
<khối lệnh>
Loop While (a = b) And (a = c)
vòng không lặp cho đến khi (a=b) and (a=c) mà nó lặp vô cùng !​

Muốn thoát khỏi vòng lặp thì trong đoạm mã <Khối lệnh>
phải có vài câu lệnh để biến đổi các trị của các biến a hoạc b hay c

Chúc thành công.

 

[laulau]

thank nhiều