这两段按键精灵里的代码用易语言怎么写 5
Text=Plugin.File.ReadFileEx("C:\所有人姓名\一号窗口.txt")MyArray=Split(Text,"|")i=0CallPlugin....
Text = Plugin.File.ReadFileEx("C:\所有人姓名\一号窗口.txt")
MyArray = Split(Text, "|")
i=0
Call Plugin.Bkgnd.SendString(HwndEx, (MyArray(i)))
第二段
文本路径="C:\所有人姓名\一号窗口.txt"
Text = Plugin.File.ReadFileEx("C:\所有人姓名\一号窗口.txt")
Text=Split(Text,"|")
数量=UBound(Text)-1
行数=1
内容= Lib.文件.读取指定行文本内容("C:\所有人姓名\一号窗口.txt",1)
内容1= Lib.文件.读取指定行文本内容("C:\所有人姓名\一号窗口.txt",行数+1)
Call Lib.文件.替换指定行文本内容("C:\所有人姓名\一号窗口.txt",内容1,行数)
Call Lib.文件.删除指定行文本内容("C:\所有人姓名\一号窗口.txt",行数+1) 展开
MyArray = Split(Text, "|")
i=0
Call Plugin.Bkgnd.SendString(HwndEx, (MyArray(i)))
第二段
文本路径="C:\所有人姓名\一号窗口.txt"
Text = Plugin.File.ReadFileEx("C:\所有人姓名\一号窗口.txt")
Text=Split(Text,"|")
数量=UBound(Text)-1
行数=1
内容= Lib.文件.读取指定行文本内容("C:\所有人姓名\一号窗口.txt",1)
内容1= Lib.文件.读取指定行文本内容("C:\所有人姓名\一号窗口.txt",行数+1)
Call Lib.文件.替换指定行文本内容("C:\所有人姓名\一号窗口.txt",内容1,行数)
Call Lib.文件.删除指定行文本内容("C:\所有人姓名\一号窗口.txt",行数+1) 展开
1个回答
展开全部
.版本 2
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
.局部变量 内容, 文本型
.局部变量 数组, 文本型, , "0"
.局部变量 i, 整数型
内容 = 到文本 (读入文件 (“C:\Users\Administrator\Desktop\123.txt”))
数组 = 分割文本 (内容, #换行符, )
.计次循环首 (取数组成员数 (数组), i)
窗口_置控件内容 (HwndEx, 数组 [i])'两个方式自己测试
文本_投递 (HwndEx, 数组 [i])'两个方式自己测试
.计次循环尾 ()
' 易语言数组1开始
这是 第一个.第二个太麻烦.你这5金币没心情写.自己想办法吧
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
.局部变量 内容, 文本型
.局部变量 数组, 文本型, , "0"
.局部变量 i, 整数型
内容 = 到文本 (读入文件 (“C:\Users\Administrator\Desktop\123.txt”))
数组 = 分割文本 (内容, #换行符, )
.计次循环首 (取数组成员数 (数组), i)
窗口_置控件内容 (HwndEx, 数组 [i])'两个方式自己测试
文本_投递 (HwndEx, 数组 [i])'两个方式自己测试
.计次循环尾 ()
' 易语言数组1开始
这是 第一个.第二个太麻烦.你这5金币没心情写.自己想办法吧
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询