程序设计
〖第1题〗『程序设计』5分题号148
题目：事件单击窗体。

响应求1020之间所有素数的乘积并输出在窗体上。

将结果存入变量L中。
注意：请在指定的事件内编写代码。
答案：
DimiAsI
teger
DimjAsI
teger
DimbAsBoolea

l1
bFalse
Fori10To20
Forj2Toi2
IfiModj0The

bTrue
E
dIf
Next
IfbFalseThe

lli
E
dIf
bFalse
Next
Pri
tStrl
〖第2题〗『程序设计』5分题号150题目：事件单击窗体。

响应求1121314……1991100的值。

将结果存入变量J中。
注意：请在指定的事件内编写代码。答案：
DimiAsI
teger
Fori1To100IfiMod21The
jj1iElseIfiMod20The
jj1iE
dIf
NextPri
tj〖第3题〗『程序设计』5分题号131【程序设计】
f题目：事件单击窗体。

响应已知S11419116125…1100，

结果输出在窗体上。
将结果存入变量S中
答案：
DimiAsI
teger
s0
Fori1To10
ss1ii
Next
Pri
ts

〖第4题〗『程序设计』5分题号152
【程序设计】
题目：事件双击窗体。

响应求1235813……前20项的和，并将结

果在窗体上输出。将结果存入变量SUM中。
注意：请在指定的事件内编写代码。
答案：
DimiAsI
teger
Dimj1To20AsI
teger
Fori1To20
Ifi3The

jii
Else
jiji1ji2
E
dIf
sumsumji
Next
Pri
tsum

〖第5题〗『程序设计』5分题号157
【程序设计】
题目：事件单击窗体。

响应求10的值，并将结果输出到窗体上。
将结果存入变量SUM中。
注意：请在指定的事件内编写代码。
答案：
DimiAsI
teger
sum1Fori1To10
sumsumiNext
fPri
tsum

〖第6题〗『程序设计』5分题号489
题目：事件单击窗体。

响应已知sum113151719

请将sum结果值输出到窗体上。

使用dowhileloop语句完成程序
注意：请在指定的事件内编写代码。
答案：
DimiAsI
teger
Dim
AsI
teger
i1
p1
DoWhilei10
ppi
IfiMod21The


1
sumsum1
1p
E
dIf
ii1
Loop
Pri
tsum

〖第7题〗『程序设计』5分题号154
【程序设计】
题目：事件单击窗体。

响应求100以内偶数的和，并将结果输出在窗体上。

将结果存入变量SUM中
注意：请在指定的事件内编写代码。
答案：r