如何正确使用oleobject和记录集?

时间:2019-10-16 16:04:26

标签: excel vba recordset createoleobject

我在OLEObjects和记录集方面遇到了一些问题...

我在代码中即时创建了一些控件。 准备它们,填充它们,然后使用从它们收集的数据在AS400(adodb)上运行查询。

当我取回数据时,我遇到了这个问题:

我在工作表顶部的oleobjects开始表现得很奇怪:它们看起来很正常,但是当我单击其中一个时,Left属性似乎发生了变化。按住鼠标按钮的同时,我会两次看到该控件,一次它应该在该控件上,并且在另一个向右偏移的位置(我们称其为越野车版本)。如果我的指针离开控件,它将返回其正常位置。

控件的全局性响应于我的鼠标单击,以使控件向右偏移并显示其“ Buggy版本”,但是仅当我单击时,才会发生正常行为(Click是我管理的唯一事件)在Buggy版本上...每次我运行查询时,越野车控件都会向右偏移。

以下是一些图片:

开始:一切正常

enter image description here

首次查询:当我单击按钮左侧时,首次运行后的行为:

first query

第二个查询:相同,但偏移量更大:

second query

当我不单击控件时,它们就像第一张图片一样。

这会影响我所有的控件,除了左边第三个= 0

我希望我很清楚,并且有人对发生的事情有所了解。

0 个答案:

没有答案