|
|
发表于 2013-9-15 14:03:36
|
显示全部楼层
我教你个简单易懂的方法哈！
首先 你先写一个 如果命令来检测是否存在该文本内容，如果存在继续往下执行，如果不存在那么就写这样一个文本并且在里面写入一个0 然后执行下面的语句
然后 你现在每加入一个物品就在之前先加一个1 也就是刚才写入的0+1就等于1了 那么你就可以在下次读取的时候就可以直接简便的知道了 你有多少个物品了 具体实现方法我还是给你写下来把 不懂在问
伸手可耻，采纳光荣！ 不做伸手党哦！ 记得采纳哈！ 这样才有爱！
功能 加入物品_点击()
////////////&为连接符
如果(文件.是否存在(系统.获取程序路径()&"文本.txt")==假)///////////判断文件是否存在,如果不存在的话执行如果里的语句!
辅助.写配置("文本行","行",0,系统.获取程序路径()&"文本.txt")
如果结束
变量 行=0
行=辅助.读配置("文本行","行",系统.获取程序路径()&"文本.txt")/////读取当前配置文件中有多少行
行=行+1////因为加入了新的内容所以+1
辅助.写配置("文本行","行",行,系统.获取程序路径()&"文本.txt")////因为加入了新的内容行增加了所以我们的行配置文件也要跟着+1,下次读取行时才不会出错!
////////////////////////////////↓这个商品内容就是你的商品号码:1222 数量:3 售价:520元 什么的,在这我用编辑框来接收加入内容
辅助.写配置("文本内容",行,编辑框.获得文本("加入内容"),系统.获取程序路径()&"文本.txt")///////这里就可以把你的内容加进去而来!
功能结束
//退出按钮_点击操作
功能 价格相加_点击()
/////我想你是想得出你所有的物品相加的价格是多少是吧？那么我们可以用一个循环语句
变量 行=0////////因为行是局部变量所以在这再一次调用是不影响前面的哦!
行=辅助.读配置("文本行","行",系统.获取程序路径()&"文本.txt")///首先读取一共有多少行
如果(行==0&&行=="")///////如果 行 为0或为空的话那么说明没有这个文本或文本没有内容且就提示
辅助.消息框("无内容","提示")
返回 假
如果结束
//////如果没问题程序就会执行接下来的代码
变量 查找行=1,查找内容,循环次数/////为了查找指定行而设立的变量
变量 总价格=0////////最后获得的钱
循环(真)
如果(循环次数==行)/////由行来决定我们该循环执行相加多少次
跳出
如果结束
循环次数=循环次数+1
变量 返回内容//////他就是存在分割出来的数组变量
查找内容=辅助.读配置("文本内容",查找行,系统.获取程序路径()&"文本.txt")/////获取物品信息
////////为什么选用:来做分割符呢？ 因为我发现在你的物品信息中普遍的用了:符号做区分
///////// 那么用:分割出来的内容是什么呢？如果是这个商品号码:1222 数量:3 售价:520元
/////////////那么他们分割出来分别是 商品号码、1222数量、3售价、520元 这四个内容
//////////////我们清楚地看到了520元被分割到了第4个 因为他排在最后,所以他也会被存在分割出来的数组变量里的第四个
字符串.分割(查找内容,":",返回内容)//////因为要取价格所以我们要截取出价格
////////返回内容[3] 你可能会奇怪为什么是3 而不是4呢 因为 数组是从0开始记录的所以刚才得4个内容分别存放在 0、1、2、3中
返回内容[3]=字符串.修剪(返回内容[3],"元")///因为元不能进行运算所以在这给他除掉!
总价格=总价格+返回内容[3]///把提取到得钱加入总价格
循环结束
辅助.消息框(总价格)///最后报出总价格
功能结束 |
|
/2 
楼主