blocks|key|1529885|text|如果没有正确注册支持库(dll或ocxs)，或者安装的库的版本与应用程序最初编译时使用的版本不同(且不兼容)，就会发生这种情况。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1529886|确保所有依赖库都已注册并且版本正确。|1529887|您可能需要重新编译该应用程序，以使其与较新版本的支持库一起工作。|1529888|entityMap^0|0|0|0^^$0|@$1|2|3|4|5|6|7|H|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|I|8|@]|9|@]|A|$]]|$1|D|3|E|5|6|7|J|8|@]|9|@]|A|$]]|$1|F|3|-4|5|6|7|K|8|@]|9|@]|A|$]]]|G|$]]

That can happen when supporting libraries (dlls or ocxs) are not registered properly or the versions of the installed libraries are different (and incompatible) with the version the app was compiled against originally. 

Make sure all dependent libraries are registered and the proper version. 

You may have to recompile the app to make it work with newer versions of the supporting libraries.

blocks|key|228202|text|我有VB6+SP6，我可以重现这个行为。在一个新项目中，将此代码放入一个窗体中。该项目在F5下运行正常。右键单击项目并选择Publish，然后选择Build+Outputs。这将生成错误消息。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|228203|Option+Explicit

Public+Sub+Init()
++++Dim+blnErrorHandling+As+Boolean

++++If+False+Then
++++++++blnErrorHandling+=+True
++++Else
++++++++blnErrorHandling+=+False
End+Sub|code-block|syntax|javascript|228204|现在注释掉最后四行：|228205|Option+Explicit

Public+Sub+Init()
++++Dim+blnErrorHandling+As+Boolean

'++++If+False+Then
'++++++++blnErrorHandling+=+True
'++++Else
'++++++++blnErrorHandling+=+False
End+Sub|228206|您不再收到该错误，并且输出将正常构建。我很快添加了一些错误处理来定位崩溃的来源，If+False+Then是完全有效的。MDAC检查器说一切正常，重新启动也不能解决问题。|offset|length|style|CODE|228207|entityMap^0|0|0|0|0|14|D|0^^$0|@$1|2|3|4|5|6|7|S|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|T|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|U|8|@]|9|@]|A|$]]|$1|I|3|J|5|D|7|V|8|@]|9|@]|A|$E|F]]|$1|K|3|L|5|6|7|W|8|@$M|X|N|Y|O|P]]|9|@]|A|$]]|$1|Q|3|-4|5|6|7|Z|8|@]|9|@]|A|$]]]|R|$]]

I have VB6 SP6 and I can reproduce this behavior. In a fresh project, put this code into a form. The project runs normally with F5. Right click the project and select Publish then Build Outputs. This generates the error message.

<pre><code>Option Explicit

Public Sub Init()
 Dim blnErrorHandling As Boolean

 If False Then
 blnErrorHandling = True
 Else
 blnErrorHandling = False
End Sub
</code></pre>

Now comment out the last four lines:

<pre><code>Option Explicit

Public Sub Init()
 Dim blnErrorHandling As Boolean

' If False Then
' blnErrorHandling = True
' Else
' blnErrorHandling = False
End Sub
</code></pre>

You no longer get the error and the outputs are built normally. I was quickly adding in some error handling to locate the source of a crash and <code>If False Then</code> is perfectly valid. The MDAC checker said all was ok and a reboot didn't solve the problem.

blocks|key|4545798|text|另一个原因可能是在使用自动化时，Office的一些次要版本不匹配：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|4545799|我有一个遗留的VB5%2BAccess应用程序(我正在用Delphi语言重写它，并用干净的OpenDocument生成替换掉所有自动化的混乱)，它在一些系统上运行得很好，但在另一些系统上却出现了错误。|4545800|这个错误会在生成Excel电子表格时发生，而且看起来是无害的(除了恼人的地方，而且它会显示十几倍于用户在中间单击“中止”的风险)，就好像总是单击“忽略”一切都像预期的那样。|4545801|我最终发现原因是Office+97的安装方式：|4545802|如果Office+97安装顺序为：|4545803|4545804|Office97+SR0+install+CD|unordered-list-item|4545805|apply+SR1+patch|4545806|apply+SR2+patch|4545807|4545808|但如果它是通过以下方式安装的，则不会：|4545809|4545810|Office97+SR1+install+CD|4545811|apply+SR2+patch|4545812|4545813|在受影响的系统上使用SR1安装程序执行卸载/重新安装解决了此问题。|4545814|entityMap^0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0|0^^$0|@$1|2|3|4|5|6|7|14|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|15|8|@]|9|@]|A|$]]|$1|D|3|E|5|6|7|16|8|@]|9|@]|A|$]]|$1|F|3|G|5|6|7|17|8|@]|9|@]|A|$]]|$1|H|3|I|5|6|7|18|8|@]|9|@]|A|$]]|$1|J|3|-4|5|6|7|19|8|@]|9|@]|A|$]]|$1|K|3|L|5|M|7|1A|8|@]|9|@]|A|$]]|$1|N|3|O|5|M|7|1B|8|@]|9|@]|A|$]]|$1|P|3|Q|5|M|7|1C|8|@]|9|@]|A|$]]|$1|R|3|-4|5|6|7|1D|8|@]|9|@]|A|$]]|$1|S|3|T|5|6|7|1E|8|@]|9|@]|A|$]]|$1|U|3|-4|5|6|7|1F|8|@]|9|@]|A|$]]|$1|V|3|W|5|M|7|1G|8|@]|9|@]|A|$]]|$1|X|3|Y|5|M|7|1H|8|@]|9|@]|A|$]]|$1|Z|3|-4|5|6|7|1I|8|@]|9|@]|A|$]]|$1|10|3|11|5|6|7|1J|8|@]|9|@]|A|$]]|$1|12|3|-4|5|6|7|1K|8|@]|9|@]|A|$]]]|13|$]]

Another cause can be when using automation, some minor-version mismatch of Office:

I have a legacy VB5+Access app (which i'm in the process of rewriting in Delphi and replacing all the automation mess with clean OpenDocument generation) that ran well on some systems and gave the error on others.

This error would happen when generating an Excel spreadsheet, and seemed harmless (except the annoyance and as it would show a dozen times the risk of user clicking 'Abort' in the middle) as if always clicking 'Ignore' everything worked as expected.

I eventually found the cause was the way Office 97 was installed:

The error would show up if the Office 97 setup sequence was:

<ul>
<li>Office 97 SR0 install CD</li>
<li>apply SR1 patch</li>
<li>apply SR2 patch</li>
</ul>

but not if it was installed with:

<ul>
<li>Office 97 SR1 install CD</li>
<li>apply SR2 patch</li>
</ul>

Doing an uninstall / reinstall with SR1 setup on the affected systems solved the problem.

blocks|key|4545900|text|当Visual+basic6应用程序进行抛出异常(即返回失败的HRESULT)的COM接口调用时，会出现此消息。在这种情况下，VB6跳转到一个异常处理程序(由On+Error设置)。在异常处理程序中有一个可见的对象Err，它包含异常的详细信息。|type|unstyled|depth|inlineStyleRanges|offset|length|style|CODE|entityRanges|data|4545901|如果对象实现了ISupportErrorInfo，并且它确实支持错误信息，并且确实设置了错误信息，那么Err.Description将获取该对象设置的错误信息中的字符串。否则，Err.Description将接受字符串Method+~+of+~+failed。|4545902|IDK其他版本的VB是否做了同样的事情；或者除了我刚才描述的场景之外，消息是否也设置在其他场景中。|4545903|entityMap^0|V|7|27|8|2Z|3|0|7|H|1F|F|2G|F|31|K|0|0^^$0|@$1|2|3|4|5|6|7|L|8|@$9|M|A|N|B|C]|$9|O|A|P|B|C]|$9|Q|A|R|B|C]]|D|@]|E|$]]|$1|F|3|G|5|6|7|S|8|@$9|T|A|U|B|C]|$9|V|A|W|B|C]|$9|X|A|Y|B|C]|$9|Z|A|10|B|C]]|D|@]|E|$]]|$1|H|3|I|5|6|7|11|8|@]|D|@]|E|$]]|$1|J|3|-4|5|6|7|12|8|@]|D|@]|E|$]]]|K|$]]

This message occurs when a Visual Basic 6 application makes a COM interface call which throws an exception (i.e. returns a failure <code>HRESULT</code>). In this case, VB6 jumps to an exception handler (as set by <code>On Error</code>). In the exception handler there is visible an object <code>Err</code> which contains details of the exception.

If the object implements <code>ISupportErrorInfo</code>, and it does actually support error info, and it did set error info, then <code>Err.Description</code> takes the string that is in the error info set by the object. Otherwise, <code>Err.Description</code> takes the string <code>Method ~ of ~ failed</code>.

IDK whether other versions of VB do the same thing; or if the message is also set in other scenarios besides the one I have just described.

blocks|key|228513|text|对于作为命令行应用程序运行的VB6程序，在编译后需要一个额外的阶段:需要在可执行文件上运行VB6链接器，以将其设置为控制台程序：|type|unstyled|depth|inlineStyleRanges|entityRanges|data|228514|<VB6+dir>\LINK.EXE++/EDIT++/SUBSYSTEM:CONSOLE++<program>.exe|code-block|syntax|javascript|228515|如果不这样做，则在程序运行时会出现Method+'~'+of+object+'~'+failed错误。|offset|length|style|CODE|228516|entityMap^0|0|0|H|V|0^^$0|@$1|2|3|4|5|6|7|O|8|@]|9|@]|A|$]]|$1|B|3|C|5|D|7|P|8|@]|9|@]|A|$E|F]]|$1|G|3|H|5|6|7|Q|8|@$I|R|J|S|K|L]]|9|@]|A|$]]|$1|M|3|-4|5|6|7|T|8|@]|9|@]|A|$]]]|N|$]]

For a VB6 program which is run as a command line application there is an extra stage required after compilation: the VB6 linker needs to be run on the executable to set it as a console program:

<pre><code>&lt;VB6 dir&gt;\LINK.EXE /EDIT /SUBSYSTEM:CONSOLE &lt;program&gt;.exe
</code></pre>

Failure to do this will give the <code>Method '~' of object '~' failed</code> error when the program is run.

blocks|key|1528081|text|根据我的经验，这是由于Microsoft+Access版本造成的。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1528082|我的程序是用MS+Office2007制作的，并安装了较新版本的MS+Office。这就是出现这个错误的原因。|1528083|entityMap^0|0|0^^$0|@$1|2|3|4|5|6|7|F|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|G|8|@]|9|@]|A|$]]|$1|D|3|-4|5|6|7|H|8|@]|9|@]|A|$]]]|E|$]]

As per my experience, it is due to Microsoft Access Version.

My program was made in MS Office 2007 and installed newer version of MS Office. Thats why this error appears.

blocks|key|1329510|text|在VB6集成开发环境中，转至“工具”->“选项”->“编辑器”，然后清除“拖放文本编辑”功能|type|unstyled|depth|inlineStyleRanges|entityRanges|data|1329511|谢谢Matthew，你为我指明了正确的方向，尽管我不完全理解你的问题|1329512|我有一个旧的VB6项目要重做，在经历了重新注册所有.ocx文件的常见创伤后，现在可以在Windows10上编辑和重新编译。我通过属性->高级->以管理员身份运行的快捷方式运行VB6|1329513|此错误持续存在，每次启动VB6集成开发环境时都会弹出|1329514|读完Matthews的帖子后，我清除了拖放文本编辑功能|1329515|关闭，重新启动VB6，错误就消失了|1329516|已重新启用拖放功能，但仍然没有错误|1329517|(仍然存在未找到自动化元素的错误)|1329518|entityMap^0|0|0|0|0|0|0|0|0^^$0|@$1|2|3|4|5|6|7|R|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|S|8|@]|9|@]|A|$]]|$1|D|3|E|5|6|7|T|8|@]|9|@]|A|$]]|$1|F|3|G|5|6|7|U|8|@]|9|@]|A|$]]|$1|H|3|I|5|6|7|V|8|@]|9|@]|A|$]]|$1|J|3|K|5|6|7|W|8|@]|9|@]|A|$]]|$1|L|3|M|5|6|7|X|8|@]|9|@]|A|$]]|$1|N|3|O|5|6|7|Y|8|@]|9|@]|A|$]]|$1|P|3|-4|5|6|7|Z|8|@]|9|@]|A|$]]]|Q|$]]

In the VB6 IDE go to Tools->Options->Editor and clear Drag-and-Drop Text Editing feature

Thanks Matthew, you pointed me in the right direction, though I don't fully understand your issues

I have an old VB6 project to rework, now able to edit and recompile OK on Windows 10, after the usual trauma of reregistering all the .ocx files. I run the VB6 through a shortcut with Properties->Advanced->Run As Administrator

This error was persistent, popping up every time I started the VB6 IDE

After reading Matthews post, I cleared the Drag-and-Drop Text Editing feature

Shut down, restart VB6 and the error had gone

Re-enabled Drag-and-Drop and still no error

(Still living with the Automation Element Not Found Error)

blocks|key|228565|text|Windows+10；|type|unstyled|depth|inlineStyleRanges|entityRanges|data|228566|复制c:\windows\SysWOW64\COMMTB32.DLL|228567|过去的C:\Program+Files+(x86)\Microsoft+Visual+Studio\VB98\|228568|这对我很管用|228569|entityMap^0|0|0|0|0^^$0|@$1|2|3|4|5|6|7|J|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|K|8|@]|9|@]|A|$]]|$1|D|3|E|5|6|7|L|8|@]|9|@]|A|$]]|$1|F|3|G|5|6|7|M|8|@]|9|@]|A|$]]|$1|H|3|-4|5|6|7|N|8|@]|9|@]|A|$]]]|I|$]]

Windows 10;
Copy c:\windows\SysWOW64\COMMTB32.DLL
Past C:\Program Files (x86)\Microsoft Visual Studio\VB98\
it worked for me

blocks|key|228364|text|我在编译的程序中出现了这个错误。调试时未出现此错误。我通过查看Err.Number的值找出了真正的问题所在。|type|unstyled|depth|inlineStyleRanges|entityRanges|data|228365|在我的例子中，值是32811，它是由对Dictionary.Remove(+key+)的调用引起的，其中key不在字典中。调试引发了相同的Err.Number，但使用Err.Description“对象'IDictionary‘的方法'Remove’失败”。|228366|在这种情况下，由于某种原因，Err.Description似乎在编译的程序中变得一团糟|228367|entityMap^0|0|0|0^^$0|@$1|2|3|4|5|6|7|H|8|@]|9|@]|A|$]]|$1|B|3|C|5|6|7|I|8|@]|9|@]|A|$]]|$1|D|3|E|5|6|7|J|8|@]|9|@]|A|$]]|$1|F|3|-4|5|6|7|K|8|@]|9|@]|A|$]]]|G|$]]

I had this error in my compiled program. It did not occur while debugging. I found out the real problem by looking at the value of Err.Number, of the raised error.
In my case the value was 32811, and it was caused by a call to Dictionary.Remove(key), where key was not in the dictionary. Debugging raised the same Err.Number but instead with the Err.Description &quot;Method 'Remove' of object 'IDictionary' failed&quot;.
It seems that Err.Description gets messed up in the compiled program, for some reason in this case

I'm trying to run a legacy VB6 application on my desktop (it doesn't have a user interface, being a command-line app), and when I do, I get a message box saying

<pre><code>Run-time error '4099':

Method '~' of object '~' failed
</code></pre>

This means nothing to me; does anyone have an idea what is going wrong?

What does "Method '~' of object '~' failed" at runtime mean?

翻译质量差，导致语言生硬或混乱。

没有提供实际的解决方法或示例。

解答不清晰，无法理解或解决问题。

页面排版不美观，阅读体验差。

文章

问答

视频

学习中心

腾讯云实验室

直播

竞赛

腾讯云架构师技术同盟交流圈

腾讯云数据库专区

腾讯云顾问专区

腾讯云原生专区

腾讯混元专区

腾讯云TCE专区

腾讯云Lighthouse专区

腾讯云HAI专区

腾讯云Edgeone专区

腾讯云存储专区

腾讯云智能专区

腾讯轻联专区 

腾讯云开发专区

TAPD专区

腾讯轻量云游戏服专区

腾讯云最具价值专家

腾讯云架构师技术同盟

腾讯云创作之星

腾讯云开发者先锋 

腾讯云代码助手

CODING DevOps

Cloud Studio

SDK中心

API中心

命令行工具

我正尝试在我的桌面上运行一个遗留的VB6应用程序(它没有用户界面，是一个命令行应用程序)，当我这样做时，我得到一个消息框Run-time error '4099':Method '~' of object '~' failed这对我来说无关紧要；有人知道哪里出了问题吗？

问在运行时“对象'~‘的方法'~’失败”是什么意思？
EN

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问在运行时“对象'~‘的方法'~’失败”是什么意思？EN