TC官方合作论坛

 找回密码
 立即注册
查看: 648|回复: 5
打印 上一主题 下一主题

[其他] 感谢夏末大大和shine宝宝大大。在他们辛勤的指导下,偶终于完成了偶的爱情测试器。

[复制链接]
跳转到指定楼层
楼主
发表于 2012-10-6 13:48:26 | 只看该作者 回帖奖励 |正序浏览 |阅读模式

马上加入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",分数符)
                  如果结束                       
          如果结束   
      
返回 真
功能结束

空间结束
回复

使用道具 举报

6#
发表于 2012-10-8 04:53:56 | 只看该作者
学习中
回复 支持 反对

使用道具 举报

5#
发表于 2012-10-6 19:26:47 | 只看该作者
这是爱情马
回复 支持 反对

使用道具 举报

地板
发表于 2012-10-6 19:04:01 | 只看该作者
这是神马?》
回复 支持 反对

使用道具 举报

板凳
发表于 2012-10-6 18:22:51 | 只看该作者
回复 1楼252253494的帖子

kankanzenmeyang
回复 支持 反对

使用道具 举报

沙发
发表于 2012-10-6 14:06:43 | 只看该作者
回复 支持 反对

使用道具 举报

*滑动验证:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18043773号

GMT+8, 2025-10-11 02:15 , Processed in 0.130112 second(s), 24 queries .

Powered by 海安天坑软件科技有限公司

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表