AutoIT：暂时缺席 Wend

Question

所有，

下面是我在 AutoIT 中编写的代码。

    $fileToWrite = FileOpen("C:\output.txt", 1)

If FileExists("C:\test.csv") Then
    $fileHandle= FileOpen("test.csv", 0)
    If ($fileHandle = -1) Then
        MsgBox (0, "Error", "Error occured while reading the file")
        Exit
    Else
        While 1
            $currentLine = FileReadLine($fileHandle)
            If @error = -1 Then ExitLoop
            $days = StringSplit($currentLine, ",")
            FileWrite($fileToWrite,$days[2] & ", " & $days[9] & @CRLF)
            EndIf
        Wend
    EndIf
Else
    MsgBox (0, "Error", "Input file does not exist")
EndIf

FileClose($fileToWrite)
FileClose($fileHandle)

以及一组错误：

C:\ReadCSV.au3(14,4) : ERROR: missing Wend.
            EndIf
            ^
C:\ReadCSV.au3(9,3) : REF: missing Wend.
        While
        ^
C:\ReadCSV.au3(15,3) : ERROR: missing EndIf.
        Wend
        ^
C:\ReadCSV.au3(3,34) : REF: missing EndIf.
If FileExists("C:\test.csv") Then
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\ReadCSV.au3(15,3) : ERROR: syntax error
        Wend
        ^
C:\ReadCSV.au3 - 3 error(s), 0 warning(s)
>Exit code: 0    Time: 3.601

我无法理解这里的问题，因为每个 While 循环都有一个 Wend 和 EndIf 以及一个 If 条件。我在这里错过了什么吗？

Answer 1

由于在 then 之后有命令 ExitLoop，因此不需要 EndIf。

（在这一行中：If @error = -1 then ExitLoop）

您可以：

1. 删除EndIf

   <前><代码>同时1
   $currentLine = FileReadLine($fileHandle)
   如果@error = -1则退出循环
   $days = StringSplit($currentLine, ",")
   FileWrite($fileToWrite,$days[2] & ", " & $days[9] & @CRLF)
   文德

2. 将ExitLoop 移动到下一行。 （这没有多大意义，但脚本仍然会运行。）

   <前><代码>同时1
   $currentLine = FileReadLine($fileHandle)
   如果@error = -1 那么
   退出循环
   $days = StringSplit($currentLine, ",")
   FileWrite($fileToWrite,$days[2] & ", " & $days[9] & @CRLF)
   结束如果
   文德

我会选择#1。

Answer 2

问题是您在 Wend 之前有一个 Endif，并且 If 已经关闭，因为您已经结束了 ExitLoop那里。

因此，要么删除 Endif，要么将 ExitLoop 放在其他地方。