Question

我正在尝试使用MsgBox执行宏来创建和提取名称变量。我试图在MsgBox代码中没有'_'运行它，它不起作用。它显示一条消息，即代码定义名称中的语法错误等于Steve Jobs。

Sub test1()
Dim name as string, lname as string, fname as string
name = “Steve Jobs”
lname = right(name, 4)
fname = left(name,5)
Msgbox “First name is” & fname & “” & “ the number of characters are” & len(fname)
Msgbox “Surname is” & fname & “” & “ the number of characters are” _ & len(fname)
End Sub

Answer 1

Sub test1()
Dim name As String, lname As String, fname As String
name = "Steve Jobs"
lname = Right(name, 4)
fname = Left(name, 5)
MsgBox "First name is " & fname & "" & " the number of characters is " & _
Len(fname)
MsgBox "Surname is " & lname & "" & " the number of characters is " & _
Len(lname)
End Sub

你使用的引号看起来很奇怪，这样它应该没问题

Answer 2

你所指的_是一个续行字符。

此外，您帖子中的引号不正确 - 虽然这可能是您将文本复制到此网站的结果（也许您必须在此过程中“通过电子邮件发送给自己”）。引号从“和”更改为"后。那么其中任何一个都可以正常运行：

行延续：

Msgbox “Surname is” & fname & “” & “ the number of characters are” & _
    len(fname)

没有续行：

Msgbox “Surname is” & fname & “” & “ the number of characters are” & len(fname)

我认为这是您尝试做的事情：

Debug.Print "Surname is """ & lName & """ and the number of characters is " & Len(lName)

在您的示例中，您使用fName作为名字和名字。姓。另外，这就是我们如何在变量周围加上引号。

使用MsgBox创建和提取名称变量时出现语法错误

2 个答案: