按键精灵读取逐行读取TXT文档，一次读取一行
答案:1 悬赏:40 手机版
解决时间 2021-03-30 11:20
- 提问者网友：雾里闻花香
- 2021-03-30 05:29
按键精灵读取逐行读取TXT文档，一次读取一行
最佳答案
- 五星知识达人网友：北方的南先生
- 2021-03-30 06:31
Text = Plugin.File.ReadFileEx("d:\我的文档\桌面\新建 文本文档.txt")//文档位置你自己改
dim MyArray
MyArray = Split(Text, "|")
If UBound(MyArray)>=0 Then
i=0
For UBound(MyArray)
//下面这句是得到文本内容
SayString Cstr(MyArray(i))
Delay 1000
Msgbox "成功输入第 " & i+1 &" 行文本内容为："& Cstr(MyArray(i))
Delay 1000
i=i+1
Next
End If
dim MyArray
MyArray = Split(Text, "|")
If UBound(MyArray)>=0 Then
i=0
For UBound(MyArray)
//下面这句是得到文本内容
SayString Cstr(MyArray(i))
Delay 1000
Msgbox "成功输入第 " & i+1 &" 行文本内容为："& Cstr(MyArray(i))
Delay 1000
i=i+1
Next
End If
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯