• 七角七分博客欢迎大家光临

如何随机读取TXT文本中的一行数据并复制在粘贴板

随笔 七七 7年前 (2017-04-08) 0个评论

Text = Plugin.File.ReadFileEx(“C:\1.txt”)
TracePrint Text
Var = Split(Text, “|”)
Var1 = UBound(Var)
TracePrint Var1
Randomize
行数 = Int((Var1 + 1) * Rnd)
TracePrint Var(行数)
Call Plugin.Sys.SetCLB(Var(行数)) ‘将内容写入剪切板
TracePrint Plugin.Sys.GetCLB()’读取剪切板内容

Text = Plugin.File.ReadFileEx(“C:\Users\Administrator.HS-201403090836\Desktop\444.txt”)
TracePrint Text
Var1 = UBound(Split(Text, “|”))
TracePrint Var1
Randomize
行数 = Int(Var1 * Rnd + 1)
返回值 = Lib.文件.读取指定行文本内容(“C:\Users\Administrator.HS-201403090836\Desktop\444.txt”, 行数)
TracePrint 返回值

这个。。之后怎么复制至粘贴板呀

喜欢 (0)
发表我的评论
取消评论

表情 贴图 加粗 删除线 居中 斜体 签到

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址