VB程序设计练习题第一题、题目：（事件）单击窗体
（响应）求50以内所有偶数的和，并在窗体上输出来。将结果存入变量S中。
代码：DimIAsI
tegerFori2To50IfiMod20The
SsiE
dIfNextPri
tCStrs
第二题题目：（事件）双击窗体
（响应）求s112123…123…10并将结果存入变量S中代码：DimijAsI
teger
DimkAsLo
gk1s0Fori1To10
Forj1Toikkj
Nextsskk1NextPri
tCStrs第三题题目：（事件）单击窗体（响应）求100以内偶数的和，并将结果输出在窗体上。
将结果存入变量SUM中代码：DimiAsI
teger
Fori1To100IfiMod20The
SumsumiE
dIf
NextPri
tsum第四题
。
题目：（事件）单击窗体（响应）编写程序求101112111213…151617的结果并将结果输出到窗体上。将结果存入变量M中。
代码：DimijAsI
tegerDimsAsLo
gFori10To15s1ForjiToi2ssjNextmms
NextPri
tCStrm第五题题目：（事件）双击窗体
（响应）求100以内奇数的和，并将结果输出在窗体上。将结果存入变量SUM中。
代码：DimiAsI
tegerFori1To100IfiMod21The
sumsumiE
dIfNextPri
tsum
第六题题目：（事件）单击窗体
（响应）已知S11419116125…1100结果输出在窗体上
代码：DimsAsSi
gleFori1To10aiiSum1aSumNextPri
tSum
第八题题目：（事件）单击窗体
（响应）求1121314…1991100的值。将结果存入变量J中
代码：DimjAsSi
gle
精选资料，欢迎下载
fDimiAsSi
glej0Fori1To100k1i1ijkjNextiPri
tj
第九题题目：（事件）双击窗体
（响应）s202122…263求s的值，并将结果存储到变量S中。代码：DimsAsLo
g
s20Fors21To263bs1SumSumbNextPri
tSum
第十题题目：（事件）单击窗体
（响应）求出100以内所有素数的和，并将结果输出到窗体上，并存入所给变量SUM中代码：DimsumAsI
tegerFori1To100Forj2Toi1ExitForNextjNextiIfiModj0The
E
dIfIfjiThe
sumsumiE
dIfPri
tsum第十二题题目：（事件）单击窗体
（响应）求1020之间所有素数的乘积并输出在窗体上。将结果存入变量L中
。
代码：DimlAsLo
gl1Fori10To20Forj2Toi1IfiModj0The
ExitForE
dIfNextjIfjiThe
lliE
dIfNextiPri
tl
NextPri
ts
第十五题题目：（事件）单击窗体
（响应）求200300之间既能被3整除又能被7整除的数。并求出所有数之和存入变量SUM中。
代码：DimsumAsI
tegersum0Fori200To300IfiMod30A
diMod70The
sumsumiE
dIfNextPri
tsum
第十七题题目：（事件）双击窗体
（响应）求12345并将结果输出到窗体上r