MsgBox代码不起作用

Question

在Macros中，在我的设备上，当我进入＆＃34; MsgBox＆＃34;一些数字或文字，一旦我移动到下一行，它会自动更改为＆＃34; msgbox＆＃34;并且在执行时它开始在此行发出错误。我该如何解决这个问题？

Sub msgbox()

    msgbox "hello"

End Sub

Answer 1

试试此代码

Sub MsgBox_test()

    MsgBox "hello"

End Sub

在函数中引用相同函数名称称为递归，它需要一个结束案例。

每次看到递归时，都需要查看If语句，该语句对某些参数组合应用最终案例。

示例递归：

Function Fibonacci(ByVal n As Integer) As Integer
    If n <= 2 Then Fibonacci=1 Else Fibonacci=Fibonacci(n-1)+Fibonacci(n-2)
End Function

意思是，如果n小于2，则函数将返回实际数字。

在您的情况下，递归永远不会结束，这会导致Stack Overflow异常。