У меня проблема с вызовом моего Sub BOM_Document_Creator, и первая строка Sub выдает ошибку (случайно и непоследовательно).Я проверил каждую переменную, и все они были переданы правильно.Эта проблема кажется довольно случайной, как при ее запуске, и все будет хорошо.В следующий раз это может не сработать снова.Я не объявляю переменную правильно?Может ли быть так, что у меня есть изобретатель и ученик в той же области (я не думаю, что это так, потому что я делаю это в других местах без проблем)?
Private Sub BOM_Document_Creator(odocapp As InventorApprentice.ApprenticeServerDocument, odocinvent As Inventor.Document, Invent As Inventor.Application, TheProgressBar As Progress_Bar, oApprentice As InventorApprentice.ApprenticeServerComponent)
Dim CompCollectionApp As InventorApprentice.ComponentOccurrences = odocapp.ComponentDefinition.Occurrences