|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
感谢夏末大大和shine宝宝大大,在他们的辛勤指导下,偶终于完成了偶的爱情测试器主体代码的编写。
小小在这说声:“谢谢了,非常感谢你们的指导”。
以下是偶的代码,不知道有木有不对的地方。或是有BUG存在?
空间 爱情测试器
功能 逻辑型 按钮0_点击()
整型 男,女,分数,下标,大小
字符型 男符,女符,分数符,路径=系统.获取程序路径()
男符=编辑框.获得文本("编辑框0")
女符=编辑框.获得文本("编辑框1")
男=字符串.长度(男符)
女=字符串.长度(女符)
如果(男<=0)||(女<=0)
辅助.消息框("请输入姓名")
否则
字符型[] 名分//此处名分指的是名字和分数的统称
字符型[] 分割后的值=字符型[2]
字符型 文件内容=文件.读文件(路径+"\\1.txt")
如果(文件内容!="")
字符串.分割(文件内容,"\r\n",名分) // \r\n是换行符
数组.大小(名分,大小)//此处的大小指的是文件内容被分割成好多组。
循环(下标<大小)
字符串.分割(名分[下标],"!",分割后的值)
如果(男符+女符==分割后的值[0])
编辑框.设置文本("编辑框2",分割后的值[1])
跳出
否则
下标=下标+1
如果结束
循环结束
如果结束
如果(男符+女符==分割后的值[0])
否则
男=辅助.随机数(25,50)
女=辅助.随机数(25,50)
分数=男+女
分数符=转换.整型转字符型(分数)
整型 文件句柄=文件.打开(路径+"\\1.txt")
文件.设置游标位置(文件句柄,"结束")
文件.写一行(文件句柄,男符+女符+"!"+分数符)
文件.关闭(文件句柄)
编辑框.设置文本("编辑框2",分数符)
如果结束
如果结束
返回 真
功能结束
空间结束
|
|