Vba 运行时错误438。对象不支持此属性或方法

我在截图中看到了这个错误。早些时候它运转良好。当我们点击debug模式时，它指向一条黄色高亮的线。如果有人能帮上忙，我将不胜感激。这是它所指的界线。

---

请查找下面的代码：-

集合确实有Count属性，因此会留下错误的Max属性，这是任何表单控件都没有的

寻求调试帮助的问题此代码为什么不起作用？必须包括所需的行为、特定的问题或错误以及在问题本身中重现这些问题所需的最短代码。没有明确问题陈述的问题对其他读者没有用处。请参阅。pgbSetup1是什么类型的控件？它甚至有Max属性吗？你的代码图片对于那些想要帮助你的人来说是无用的，他们可以单步浏览代码，看看它到底做错了什么。为什么志愿者要花时间重新打字，希望不要像他们那样打字！当你很容易将代码复制/粘贴到问题中时。请输入代码。当代码停在该行时，右键单击Coll_Docs并选择add watch，然后单击ok。“监视”窗口应显示Coll_Docs对象的详细信息。。。它有计数属性吗？现在添加了代码..你们都能帮忙吗。关于计数属性，我检查了它在那里。你们认为如果我注释掉这一行和下一行，它会对程序逻辑产生很大的影响吗。我知道从截图上很难判断。实际上，这段代码存在于其他系统中，所以我可以在星期一之前添加整个函数！主驾驶舱！pgbSetup1.Value=0当我注释掉这一行时，在下一行表单上显示错误！主驾驶舱！pgbSetup1。值=0。周一我可以试着把这两行都注释掉，看看它是否有效，但在此之前我想知道它是否会改变逻辑？很难说。我们几乎不知道你的代码应该做什么。