運行時錯誤：Vb 6.0中出現堆棧空間不足28

Question

我在運行VB 6.0項目時出現堆棧空間錯誤。

我知道堆棧空間不足意味着某些東西會不斷地將數據推送到堆棧上，當堆棧空間滿了時堆棧就沒有空間了。

任何人可以幫助如何去解決這個錯誤？

的問題發生在以下情形： 我有大約20屬性獲取和在我的代碼的一組語句，當我的代碼試圖分配一個值出現此問題（可以說爲第九屬性）

Public Property Get Language() As String 
    Language = m_strLanguage 
End Property 

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

我的代碼進入遞歸循環。

Answer 1

您是否有導致遞歸循環的邏輯錯誤？你有沒有回頭看看調用堆棧，看看爲什麼遞歸循環正在發生？

Answer 2

感謝您的建議。你是對的 。我已經解決了這個問題，代碼現在運行良好。

問題在於如何設置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