Question

VB读取文本文件内字符串并赋值给变量

我有一个如下形式的文本，希望提取字符串给变量。请问可以采用什么方法？
文本样式：
AT1 NET1 NET2 NET3 NET4 W=10U L=50U
AT2 NET5 NET6 NET7 NET8 W=20U L=30U
………………
…………
……
…

Answer 1

楼上的回答没有进行行扫描... 稍微修改一下

open "data.txt" for input as #1 'data.txt为存储数据的文件

do until EOF(1) = True '判断是否读到文件结尾
lineinput #1,tx '读入一行
array（a）=split（tx） '分割
for i=0 to ubound(a)
b(j,i)=a(i) '赋值
next i
j=j+1
loop

close #1 '关闭文件
'输出b(,)

Answer 2

open "" for input as #1
lineinput #1,tx
array（a）=split（tx）
for i=0 to ubound(a)
b(j,i)=a(i)
next i
j=j+1
close #1

Answer 3

不知道你是简单的字符合并，还是数值相加？
如果是前者，应该没有错。如果是后者，那就不行了。