代码行中间的预期行尾错误答案

【问题标题】：Expected end of line error in middle of codeline代码行中间的预期行尾错误
【发布时间】：2014-06-05 17:40:56
【问题描述】：

我有这个简单的 vbscript，但是当我尝试运行它时，windows 给了我一个错误。我以前从未使用过 vbscript，我尝试用谷歌搜索，但可以找出原因。我在第 1 行字符 16 处收到预期的行尾错误。有人看到什么吗？另外，我在记事本中对此进行编码并通过双击文件来运行它。我还有其他方法吗？

Dim WithEvents Button As CommandButton
Private Sub Application_StartUp(Cancel As Boolean)
Set Button = CommandButtons.Add("Click me")
End SubPrivate Sub Button_Click()
Msgbox "Clicked", vbInformation
End Sub

【问题讨论】：

无效 VBScript（As XXX 无效）是 VBA/6/.Net 吗？
可能是 VBA。 VBA 文件是否也具有 .vbs 扩展名？
这很可能是 Outlook VBA。它不会有vbs 扩展名。它将有一个类 (cls) 或模块 (bas) 扩展。
嗯，“可能是 VBA”？这是你的剧本，你正在写。（你写了“我在记事本中编码”，不是吗？）如果你不知道它是什么，我们该怎么做？

标签： vbscript

【解决方案1】：

既然提到了记事本被用于此目的并查看代码，这肯定是在 Visual Studio 中使用 VBScript 将按钮添加到基于表单的应用程序的代码。

通过记事本实现的 VBScript 并不擅长用于创建 GUI 对话框等。使用记事本的示例代码如下：

toRepeat = InputBox("What should I repeat?", "Echo", "Hello World")
MsgBox toRepeat

在本例中将重复输入框中输入的内容。

如果 Visual Studio 不可用并且有兴趣构建基于表单的应用程序，则可以通过 Word 或 Excel 在 VBA 中创建用户表单。以下网站提供了一个很好的在 Excel 中创建用户表单应用程序的教程：Excel VBA Userform - Easy Excel Macros

如果有兴趣，我最近在我的博客中写了一篇解释可用的不同风格的 VB：VBA vs VBSCRIPT vs Visual Basic

谢谢，

肖恩·W.

【讨论】：