由於換行符與賬號密碼分隔符一樣，都是"|"，所以這裡我把":"當做賬號密碼分隔符。程式碼：Dim Path, Text, i, zmPath="C:\Documents and Settings\Administrator\桌面\新建 文字文件.txt" "填入檔案路徑Text = Plugin.File.ReadFileEx(Path) "讀取文字內容Text = Split(Text, "|") "將讀取到的內容一行行地分割為陣列TracePrint UBound(Text)For i = 0 To UBound(Text) - 1 zm = Split(Text(i), ":") "分割每行內容 SayString zm(0) KeyPress 9, 1 SayString zm(1) KeyPress 13, 1NextMsgBox "所有賬號均已使用",64,"提示"

HH = Plugin.File.OpenFile("d:\1.txt")//改成你自己的檔案絕對路徑Call Plugin.File.SeekFile(HH, 你賬戶名起始的位元組數)t1 = Plugin.File.ReadLine(HH)Call Plugin.File.SeekFile(HH,你密碼起始的位元組數)t2 = Plugin.File.ReadLine(HH)//滑鼠移動到輸入賬戶的位置並單機Delay 100SayString "t1"KeyPress "Tab", 1//或者是滑鼠移動到輸入密碼的位置並單機Delay 100SayString "t2"Call Plugin.File.CloseFile(HH)具體的操作都寫在註釋上面了。希望對您有幫助。

全部內容 = Plugin。File。ReadFileEx("C:文字。txt")

全部內容按行分割 = Split(全部內容, "|")//分割成陣列文字中一豎表示換行。 如果文本里存在一豎請使用其他換行符。

TracePrint 全部內容按行分割(1) ? //第二行內容 ?材料1 * 6 材料2 * 10

分割 = Split(全部內容按行分割(1), " ") //這次以加號再次分割一下。

材料1 = 分割(0) ? ?//材料1 * 6 ? ? 存在空格可以去掉。

材料2 = 分割(1) ? ?// 材料2 * 10 ? 存在空格可以去掉。

物品 = 材料1 材料2//字串無法計算只能連線處理。

//按你的方式最終物品得到的結果是這個東西。 物品=材料1 * 6 材料2 * 10

根據你的要求我也只能寫成這樣了。這個物品得到的結果可能不是你需要的吧。