帮忙做2道VB的题目
帮忙做2道VB的题目
日期:2009-08-26 20:53:06 人气:1
问题1
For i=8 to 20
Me.FontSize=i
Print "样例"
Next i
问题2
10的本质为2*5,所以只要寻找2和5的因子即可
程序:
M2=0 : M5=0 '初始化变量
For i=1 To 100 'i从1到100循环,模拟1-100相乘
k = i '临时变量
While k Mod 2 = 0 '寻找2这个质因子
M2