UC知道一个VB变成题，请高手帮忙做下！谢谢！
来源：百度知道 编辑：UC知道 时间：2024/05/31 12:28:40
某单位全年每次报销的经费（假定为整数）存放在一个磁盘文件中，试编写一个程序，从该文件中读出每次报销的经费，计算其总和，并将结果存入另一个文件中。
假定文件格式为每行一个数据。
dim l as long,s as string
open "报销的经费" for input as #1
do while not eof(1)
line input #1,s
l=l+ clng(s)
loop
close #1
open "总和" for output as #1
print #1,str(l)
close #1