n = 0
For i = 238 To 957
If i Mod 10 = 9 Then n = n + 1
Next i
MsgBox "個位是9的數有" & n & "個"
上面是VB的,下面這個是VF的:
for i=238 to 957
If i-int(i/10)*10=9
n = n + 1
endif
next i
retu