作者ClubT (梅花10)
看板Visual_Basic
标题Re: [VB6 ] 一些关於文字读取的问题((有更新))
时间Fri Oct 30 15:58:35 2009
※ 引述《Changsunche (长孙辙)》之铭言：
: 对於Text1.Multiline=True这边，我已经能够让一个Text1.text能够多行输入，
: 但问题在於：读取方面，我不知道要如何像TXT一般读取，
: -----------------------------------------------------------
: 在TXT文件里面，读取方式为：
: 假设0.txt为文件，并且在D槽内。
: ----
: Open "D:\0.txt" for input as #1 '像这样，之後使用
: Do while not Eof(1)
: open #1,n1,n2
借问一下 n1 n2 是什麽?
: Loop
: ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
: 像这样的读取方式，但是在Text中，
: 我不知道要如何读取QAQ。
: 意思就是：我会读取Txt内的数字，
: 但是不会读取Text内的资料。
可以把text的资料存到阵列
Dim arr() as String '宣告阵列
arr=Split(Text1.Text,
vbCrLf) '以
分行符号来切割text1的内部至arr阵列
￣￣￣ ￣￣￣￣
这样arr(0)就是text1的第一行
arr(1)就是text1的第二行
而Ubound(arr)就是总行数-1 (因为是从0开始计算)
接下来就是一行一行处理
可以再用另一个阵列做类似的处理(换用 " " 做切割)
--
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 220.136.47.199
※ 编辑: ClubT 来自: 220.136.47.199 (10/30 15:58)
1F：推 Changsunche:对於你所说的n1,n2是读取以空隔为区分 10/30 17:10
2F：推 Changsunche:也大概知道如何使用 10/30 17:29