private sub form_load()
text1.text = ""
text1.setfocus
for i = 1 to 10
    sum =sum+i
next i

text1.text = sum
end sub
上述程序可以运行吗？

我想应该不能运行 变量未定义

text1.setfocus
是多余的去掉即可

dim i,sum
sum=0(赋予一个初值)

谢谢各位了，试过了，是不可以运行！报错了~可惜我看不懂了。

我也是新手啊，也不咋懂。
    不过我觉得是因为在_load事件中不能计算，只能用于初始化条件的

楼上有一位说的对，load事件好像不能支持计算，你可以把load事件改成Click事件，这样可能就行了。

一。在LOAD時不能設置得到光標你可以像tabindex=0
二。計算是可以的大家可以試試

怪事我怎么去掉text1.setfocus后可以呢？