入所给变量SUM中。
注意：请在指定的事件内编写代码。
答案：
DimiAsI
teger
DimjAsI
teger
DimkAsI
teger
DimbAsBoolea

bFalseFori2To100
bFalsejCI
tSqriFork2Toj
IfiModk0The
bTrue
E
dIfNextIfbFalseThe
sumsumiE
dIfNextPri
tsum
〖第1题〗『程序改错』5分题号132
f
【程序改错】
题目：求s2468，阶乘的计算用Fu
ctio
过程

fact实现
注意：不可增加或删除程序行，也不可以更改程序结构

PrivateSubForm_Click
dimiasi
tegersasLo
g
FOUND
Fori2To8
ssfacti
Nexti
Pri
ts
E
dSub
FOUND
PublicFu
ctio
fact
dimtasLo
g
dimiasi
teger
t1
Fori1To

tti
NextI
FOUND
facti
E
dFu
ctio
答案：
1Fori2To8Step22PublicFu
ctio
factByVal
AsI
teger或PublicFu
ctio
fact
AsI
teger或PublicFu
ctio
fact
或PublicFu
ctio
fact
或PublicFu
ctio
factByVal
或
PublicFu
ctio
factByVal

3factt
【程序设计】
题目：编写函数fu
，函数的功能是：计算
门课程

的平均值，计算结果作为函数值返回。

例如，若有5门课程的成绩是：92，76，69，

58，88，则函数的值为766。
注意：请在指定的事件内编写代码。
答案：
DimiAsI
teger
DimyAsSi
gle
Fori1To

yyai
Next
fu
y

f〖第16题〗『程序设计』1分题号464【程序设计】题目：求两个数m
的最大公约数p和最小公倍数q注意：请在指定的事件内编写代码。答案：
m
mIfm
The
tmm
trmMod
DoWhiler0
m
rrmMod
Loop
p
q
m

fr