在线等VB求救:计算累加
请不要嫌我说得啰嗦,这也是为了节约您的时间:
设计一个VB6小程序,在文本框输入或粘贴一段数字,这些数字都是0-9的个位数,且它们之间被用回车键隔开,即每行仅有一个数字(允许数字间隔几行).现在依次从最下面的数字向上累加,倒数第123个数字第一次求和,且大于等于10的仅算个位数(如789和为14,结果是4,235和是10,结果是0),然后以此为基数,每一个数计算一次向上求和,同样的,大于10的仅算个位数.按按钮后生成.txt格式的文本弹出(请使用Shell"C:WINDOWSNOTEPAD.EXE"&App.Path&"累加结果为.txt",1),在txt输出结果要与原来输入的顺序颠倒,每个数字也用回车键隔开,每行仅含一个数字.要求自己验证通过!不要错误的还发!
举例:
4
7注意上面有个间隔
9
6
4
6
8
7
1
8
那么在txt中输出的结果(不要有空行)是:
6
4
4
9
6
(说明:817这三个数第一次求和,和为16取6,以6为基数,与上面的8求和,和为14取4,然后46和为10取0,04和为4取4,46和为10取0,09和为9取9,97和为16取6,6上面有个空行,跳过加上面的4,和为10取0,即是输出结果.)
大哥们啊,快现身啊
邮箱: 联系方式: