B4X:
Dim a As Int : a = 1
Dim b As Int : b = 1
Dim c As Int : c = 1
Do While a = b AND a = c AND b = c
b = Rnd(1,4)
c = Rnd(1,4)
Loop
Log(a & "-" & b & "-" & c)
and im getting these results
B4X:
1-2-2
1-1-2
1-1-3
1-3-2
1-1-2
1-1-3
1-1-3
1-3-2
1-2-3
1-3-1
1-2-2
but when using Do Until and change line to
B4X:
Do Until a <> b AND a <> c AND b <> c