vb编写一程序计算 s=2+4+6+8+······ +20,要求将结果显示到文件框控制件中

你好!希望你们写好就给我答案,好吗

第1个回答  2010-04-16
先在Form窗体中创建一个文本框,然后按F7打开代码窗口,代码如下:
Private sub Form_click()
dim s as integer,i as integer
for i=2 to 20 step 2
s=s+i
next i
text1.text=s 或Text1.text=str(s)
End sub
就ok了,按F5运行,单击空白处,文本框就会出现结果了。
第2个回答  2010-04-27
dim i,s as Integer
for i = 2 to 20 setp 2
s = s + i
next
text1.text = s
第3个回答  2010-04-16
dim i& ,s&
s=0
for i=2 to 20 step 2
s=s+i
next
text1.text=s本回答被提问者采纳