20,872.4,0,2.1,西南,91以上是文本文件中的一行数据,共有6组,我定义了w1 w2 w3 w4 w5 w6这6个string变量
使用open "xx.txt" for input as #1我想请问怎样把这一行的数据读出来给w1到w6呢??是用GET吗?(注意,这6个数据的长度不是固定的)
使用open "xx.txt" for input as #1我想请问怎样把这一行的数据读出来给w1到w6呢??是用GET吗?(注意,这6个数据的长度不是固定的)
解决方案 »
- vb怎么做出类似网页那种框架的页面结构
- POP3编程 如何只查看邮件标题,点击具体邮件才下载邮件内容
- 过滤字符串的问题。。。。。。急。。。。。。。。
- 在vb6.0中,用程序怎样解压一份ZIP文件
- 微软说:在CPU速度超过2GHz处理器计算机上无法运行某些程序
- 一个关于crystalreport的问题?
- ■■高薪招聘VB程序员6000以上(要有项目经验VB+数据库)
- Spread的问题?
- HEX函数报错,郁闷
- 快来帮帮忙!!各位大虾!!!关于用vb和execel进行连接的问题。还有查询的问题!!快来!时间很紧!!
- 如何用VB画出office2007那样的图表?
- vb监视文件,以下代码能运行,出现一个文件,能报出,若有两个文件以上, 只能报出其中一个,我想全部报出
Line Input #1, Textline Split(txtTemp, ",") 可以直接带数组
再根据逗号使用split函数分割
open "xx.txt" for input as #1
dim Arr() as string
dim StrData as string
Line Input #1, StrData
arr=split(StrData,",")
close #1'以上运行后.Arr(0)至Arr(5)为数据.
'如果你一定要读到 W1 W2 W3 W4 W5 W6
'那再加一段W1=arr(0)
W2=arr(1)
W3=arr(2)
W4=arr(3)
W5=arr(4)
W6=arr(5)