1．作一个求最小公倍数的程序
2．累加器：n=1+3+5+......+99
3.计算n的阶乘
4．用If 语句做一个重点号金字塔(当单击command1 的时候)．如下：
*
* *
* *
* *
* *
* * * * *
參考答案:2 题累加器
Private Sub Command1_Click()
Dim s, n
For s = 1 To 99
If s Mod 2 <> 0 Then
n = n + s
End If
Next s
Print n
End Sub
3.计算n的阶乘
Private Sub Command2_Click()
Dim s, n
n = 1
For s = 3 To 1 Step -1
n = n * s
Next s
Print n
End Sub
——————
其它的我没看明白，呵呵
