②For 变量 = Val(Text1.Text) To Val(Text2.Text) Step ((Val(Text1.Text)-Val(Text2.Text))/(Abs(Val(Text1.Text)-Val(Text2.Text)))) 'Text1中输入的是第一个数,Text2中输入的是第二个数。
If 变量 Mod 7 = 0 And 变量 Mod 5 <> 0 Then Print 变量
Next 变量
③另一个变量 = 0
For 变量 = 2 To 10
另一个变量 = 另一个变量 + (变量-1)*变量
Next 变量
Print 另一个变量