VF编程,1到100之间,所有即是3的倍数又是7倍数的自然数

网友回答

set talk off
clearfor i=1 to 100
if i%3=0.and.i%7=0
?i endifendfor
set talk on
======以下答案可供参考======
供参考答案1:
for i=1 to 100
if mod(i,3)=0.and.mod(i,7)=0
??iendifendfor
供参考答案2:
Private Sub Command1_Click()
For i = 1 To 100
If i Mod 3 = 0 And i Mod 7 = 0 Then
Print i
End IfNextEnd Sub