Add Dim ErrorMessage As String on a new line.

• 作为新行添加到代码行。