當腳本運行後

① 寫一個VBS腳本，運行後，可以把此腳本里包含的一段文字提取出來 以text文件打開顯示到當前。謝謝了

Dim fso
Dim str

str = "我愛你" '這里定義你要找的字元串

Set fso = WScript.CreateObject("Scripting.Filesystemobject")

Set read = fso.OpenTextFile("d:\workNote.txt",1)'其內路徑是你要從哪裡找的那個文本

temp = read.ReadAll

If InStr(temp, str)>0 Then
WScript.Echo "find"
Set output = fso.CreateTextFile("d:\workNote1.txt",True) '這個路徑是你想要把你搜的字元串寫到哪
output.Write str
WScript.Echo "寫成功，保存完畢！"
output.Close
Else
MsgBox "not found"
End If

Set fso = nothing

② scratch停止全部腳本為什麼按下空格鍵還運行

scratch當腳本執行到腳本「等待按下空格鍵」，程序停止，可看到「我的變數」的值為1，按下空格鍵，「我的變數」的值為2?直到，「我的變數」的值為10，程序結束。兩條等待腳本是必須的，如去掉第2條等待腳本，當腳本執行到「等待按下空格鍵」，程序停止後，按下空格鍵，在按下空格鍵未抬起前，程序就會執行所有餘下的循環，直到程序結束。