Ошибка выполнения: 28 из пространства стека в Vb 6.0

Question

Я выхожу из ошибки пространства стека во время работы моего проекта VB 6.0.

Я понимаю, что из пространства стека означает, что что-то непрерывно толкает данные в стек, и когда он заполняется, у стека больше нет места.

Может ли кто-нибудь помочь в решении проблемы с этой ошибкой?

Проблема возникает в следующей ситуации: У меня есть около 20 Property Get и Set отчеты в моем коде, и эта проблема возникает, когда мой код пытается присвоить значение (позволяет сказать, что для 9 собственности)

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