马上加入TC
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
TC4.0--------新手教程--------数组
http://bbs.tyuyan.com/thread-22289-1-1.html
- //txt文本 数据格式
- // aaa|bbb
- // ccc|ddd
- // 账号|密码
- // ...................
- // 空行 或 格式错误 的将被去除 不写入表格
- 空间 导入账号密码
- 功能 导入_点击()
- 变量 路径=文件.对话框(1,"txt files (*.txt)|*.txt||") //选择 文件,只允许TXT文件
- 如果(路径!="")//判断是否选择 文本
- 导入账号密码.文本操作(路径) //功能调用 并将txt文本地址 传参 给文本操作
- 如果结束
- 功能结束
- 功能 文本操作(路径)
- 变量 表格的写入行数=1 //表格从第一行开始写入数据 ,第0行是 标题
- 变量 文本数据=文件.读文件(路径) //读取文本
- 如果(文本数据=="") //判断文本是否有内容
- 返回 空 //返回任何值都可以 只有个作用 用来停止 后续操作
- 如果结束
- 变量 每行数据=数组[0],行数
- 字符串.分割(文本数据,"\r\n",每行数据) //将数据 进行 按行 分割
- 数组空间.大小(每行数据,行数) //获取行数
- 遍历(下标=0;下标<行数;下标++)//遍历 每行数据
- 如果(每行数据[下标]=="") //判断是否为空行
- 继续 //条件成立 跳过后续操作 判断 下一行
- 如果结束
- 变量 临时账号密码数据=数组[0],数据个数
- 字符串.分割(每行数据[下标],"|",临时账号密码数据) //对每行数据进行分割 分割符号按自己的格式进行更改
- 数组空间.大小(临时账号密码数据,数据个数)
- 如果(数据个数!=2) //格式中 只有2个数据,如果数据个数不等于2, 说明 txt文本 的该行 的格式错误
- 继续
- 如果结束
- 如果(临时账号密码数据[0]==""||临时账号密码数据[1]=="")//判断账号密码 是否为空字符串
- 继续
- 如果结束
- 表格.设置大小("表格0",表格的写入行数+1,2)//第1行是标题 ,表格大小要设置的比写入行数多1行
- 表格.设置内容("表格0",表格的写入行数,0,临时账号密码数据[0]) //写入账号
- 表格.设置内容("表格0",表格的写入行数,1,临时账号密码数据[1]) //写入密码
- 表格的写入行数++ //写入行数计数递增
- 遍历结束
- 功能结束
- 功能 退出_点击()
- 辅助.退出()
- 功能结束
- 空间结束
- //空间结束语句
|
[复制链接]
/2 
发表于 2012-12-31 13:21:53
发表于 2012-12-31 13:30:02
楼主