Vb6 运行时错误：Vb 6.0中堆栈空间不足28

运行VB6.0项目时出现堆栈空间不足错误

我理解堆栈外空间意味着某些东西在不断地将数据推送到堆栈上，当数据满时，堆栈就没有更多的空间了

有人能帮忙解决这个错误吗

问题发生在以下场景中： 我的代码中大约有20条属性Get和Set语句，当我的代码试图赋值时，就会出现这个问题（比如第9个属性）

---

我的代码进入递归循环。

是否存在导致递归循环的逻辑错误？您是否回顾了调用堆栈以了解发生递归循环的原因？

谢谢您的建议。你是对的。我已经解决了这个问题，代码现在运行良好

问题在于Let属性是如何设置的：我传递了错误的变量，现在已经更正了

Public Property Let Language(ByVal strLanguage As String) 
   Language = strLanguage 
End Property 

使代码进入递归循环

正确的代码是：

Public Property Let Language(ByVal strLanguage As String) 
   m_strLanguage= strLanguage 
End Property 

Public Property Let Language(ByVal strLanguage As String) 
   m_strLanguage= strLanguage 
End Property