TC官方合作论坛

标题: 为什么文本导入不了到表格里啊我用的是5.0 [打印本页]

作者: sososobored 时间: 2015-8-25 10:08
标题: 为什么文本导入不了到表格里啊我用的是5.0
本帖最后由 sososobored 于 2015-8-27 03:30 编辑

function 导入_文本()
var 获取浏览内容 =browsegettext("浏览框0")
消息框(获取浏览内容,"开始导入")
browsesettext("浏览框0",获取浏览内容)

var 表格的写入行数 = 1
var 文本数据= 文件读取内容(获取浏览内容)
if(文本数据=="")
      return null
end

var 数组1 = 数组()
var 每行数据 = 数组1[0],行数
字符串分割(文本数据,"|",每行数据)
var a=数组(每行数据,行数)
var ar_len=数组大小(a)

遍历( var 下标 = 0; 下标 < 行数; 下标++)
      如果(每行数据[下标]=="")
      继续
   结束

      var 临时账号密码数据 = 数组1[0],数据个数
      字符串分割(每行数据[下标],"|", 临时账号密码数据)

      var aa= 数组(临时账号密码数据,数据个数)
      var aar_len = 数组大小(aa)

      如果(数据个数!=2)
      继续
      结束

      如果(临时账号密码数据[0]==""||临时账号密码数据[1]=="")
         继续
      结束

      表格设置大小("表格0",表格的写入行数+1,2)
      表格设置内容("表格0",表格的写入行数,0,临时账号密码数据[0])
      表格设置内容("表格0",表格的写入行数,1,临时账号密码数据[1])
      表格的写入行数++
end

end

function 按钮0_点击()

导入_文本()

end

为什么不行啊

作者: 574221329 时间: 2015-8-25 10:21
变量文本分行数组,文本分列数组
变量内容 = 文件读取内容("改成你文本的路径.txt")
变量行数 = 字符串分割(内容,"\r\n",文本分行数组)
遍历(变量 i=0;i < 行数;i++)
      变量列数 = 字符串分割(文本分行数组[i],"\t",文本分列数组)
      遍历(变量 o = 0; o < 列数; o++)
         调试输出(文本分列数组[o])//这里就是内容了.
      结束

结束

作者: 言术 时间: 2015-8-25 10:31
变量行数的值呢？

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)