变量SUM中。
注意:请在指定的事件内编写代码。
答案:
DimiAsI
teger
Fori3To300
IfiMod30The
sumsumi
E
dIf
Next
Pri
tsum
〖第6题〗『程序设计』5分题号412【程序设计】题目:事件单击窗体。
响应输出所有的三位数,它满足该数中有某两位
为相同的数,且该数是一个完全平方数。
求出所有这些数的和,并将结果存入变量SUM中。
注意:请在指定的事件内编写代码。
答案:
dimaasi
tegerbasi
teger
dimb3asi
tegerb2asi
tegerb1asi
teger
fora10to31
baa
b3b100
b2b10mod10
b1bmod10
ifb1b2orb1b3orb2b3the
ab
sumsumb
e
dif
exta
fsum
〖第7题〗『程序设计』5分题号487
【程序设计】
题目:事件单击窗体。
响应已知s113151719请将s结果值
输出到窗体上。使用dowhileloop语句完成程序
注意:请在指定的事件内编写代码。答案:
DimiAsI
teger
i1
p1
DoWhilei9
ppi
IfiMod21The
ss1p
E
dIf
ii1
Loop
Pri
ts
sums〖第8题〗『程序设计』5分题号496
【程序设计】
题目:事件单击窗体。
响应求1100中为5或7的倍数的和。请将结果
输出到窗体上并存入所给变量SUM中。
使用whilewe
d语句完成程序
注意:请在指定的事件内编写代码。答案:
DimiAsI
teger
i1
Whilei100
IfiMod50OriMod70The
SumSumi
E
dIf
ii1
We
d
Pri
tSum
〖第9题〗『程序设计』5分题号500
【程序设计】
题目:事件单击窗体。
响应输出一个如图所示的由数字组成的倒三角形
f
请将结果存入变量S中要求利用msgbox函数
显示结果,使用for
ext语句完成程序
注意:请在指定的事件内编写代码。
答案:
DimtmpAsStri
g
DimiAsI
tegerjAsI
teger
tmp