好不容易上个网,就允许我多写几篇吧!
这次是建了个command,点击写的。
Dim max as integer
Dim mystr as string
mystr = " "
for i = 0 to 9
mystr = mystr + " "+ str(f(i))
' print str(f(i))
Next i
print mystr
max = f(0)
for i = 1 to 9
if f(i)> max then
max = f(i)
end if
next if
print str(max)
end sub
心得体会:在command中写的时候,还得选择点击窗口,这样写的内容才有效。另外还是对mystr 和str()不熟悉,应多看看书。