数据内容=到文本(读入文件(取运行目录()+“\文件名”))
下面代码无法写了,只能给看例子。 比如我要导入qq账号和qq密码到超级列表框里
数据内容=
123456----eyybbs
456789----eyybbs
文本数组=分割文本(数据内容,#
换行符,)
计次循环首(取数组成员数(数据内容),n)
结果数组=分割文本(文本数组[n],“----”,)
如果真(取数组成员数(结果数组)=2)
索引=超级列表框1.插入表项()
如果真(取数组成员数(结果数组)=2)’加个如果以防数据内容错乱导致软件报错
超级列表框1.至标题(索引,0,结果数组[1])
超级列表框1.至标题(索引,0,结果数组[2])
计次循环尾
这个代码我给你敲了两遍,第一遍网页无缘无故关闭了,纯手工。不懂请hi我。百度hi头像有我qq
追问你这个是 excel 还是 access
追答都可以的。 只要能读入就行
追问看不懂我是新手
追答请留下联系方式。
追问1074239719