1.
dim i,s
i = 0
s = 0
while i<=100
if(i mod 2)=0 then
s = s+i
end if
i = i+1
wend
form1.caption = cstr(s) '此方法1
text1.text = cstr(s)' 此方法2
2.
dim s, a,b
a = 22
b = 33
s = a*b
's就是面积
3.太难了, 不理解题意.
1.
dim i,numa.numb
function AddNum()
numa=int(2)
for i= 1 to 99
numa=numa+2
next
end function
2,3题目不明白`请写明白点`理解不了`
好棒啊!