VB6.0 RibbonX 控件回调问题 刷新用户界面

7176386

1. Public Sub Combobox1_getText(control As IRibbonControl, ByRef returnedVal)
   
2. ' Code for getText callback. Ribbon control comboBox
   
3. End Sub
   

复制代码

问题1：


请问各位大佬，VB6.0 在封装RibbonX 时，Combobox1_getText对应的returnedVal 如何更新到控件上？

源文件的Excel文档的代码在VBA下没有问题，但是不知道为什么，同样的代码写到VB6.0里returnedVal 就不起作用了。

约定的童话

VB6.0 也能封装RibbonX？

7176386

约定的童话 发表于 2023-3-2 07:29
VB6.0 也能封装RibbonX？

可以的哇，只不过VB比较老了，查资料老费劲。

WANT-T

第1 个问题：returnedVal，这个参数，在不同的回调事件中，返回的是不同的内容，在Combobox1_getText方法里，返回的是输入框里的内容，在Checkbox1_getPressed， 返回的是checkbox的值，等等；
第2 个问题：关于label的文本换行，方法有好多种，既然你用的是回调，那就提供一个回调的解决方案，用getLabel方法来回调label,如果需要换行，使用拼接字符串，& vbcrlf & ;

7176386

WANT-T 发表于 2023-3-2 09:24
第1 个问题：returnedVal，这个参数，在不同的回调事件中，返回的是不同的内容，在Combobox1_getText方法里 ...

请问各位大佬，VB6.0 在封装RibbonX 时，请问如何回调上述：returnedVal 返回控件？


我现在就是卡在问题1上，回调不到控件上，VBA里面，直接是在事件里面直接returnedVal=

7176386

WANT-T 发表于 2023-3-2 09:24
第1 个问题：returnedVal，这个参数，在不同的回调事件中，返回的是不同的内容，在Combobox1_getText方法里 ...

问题二的解决方案还是有点瑕疵。

WANT-T

7176386 发表于 2023-3-2 10:14
问题二的解决方案还是有点瑕疵。

有没有瑕疵，属于你的细节调整问题，自己慢慢尝试，熟能生巧；

WANT-T

7176386 发表于 2023-3-2 09:58
请问各位大佬，VB6.0 在封装RibbonX 时，请问如何回调上述：returnedVal 返回控件？

如果回调没有研究清楚，就放弃这种开发方案吧，毕竟已经很少有有用了！

7176386

WANT-T 发表于 2023-3-2 12:14
如果回调没有研究清楚，就放弃这种开发方案吧，毕竟已经很少有有用了！

方法是找到了，但是就是不知道怎么使用。老汗颜了。

7176386

WANT-T 发表于 2023-3-2 12:14
如果回调没有研究清楚，就放弃这种开发方案吧，毕竟已经很少有有用了！

IRibbonUI 成员

由 onLoad 过程（在 customUI 标记上指定）返回的对象。 该对象包含用于使控件属性失效的方法，以及用于刷新用户界面的方法。

方法

名称

说明

[color=var(--theme-hyperlink)]ActivateTab激活指定的自定义选项卡。如果没有功能区或功能区已折叠，则此方法返回S_FALSE。
[color=var(--theme-hyperlink)]ActivateTabMso激活指定的内置选项卡。
[color=var(--theme-hyperlink)]ActivateTabQ激活 Microsoft Office Fluent 功能区用户界面上指定的自定义选项卡。 使用该选项卡的完全限定名称，其中包括该选项卡的 ID 和命名空间。
[color=var(--theme-hyperlink)]Invalidate使功能区用户界面所有控件的缓存值失效。
[color=var(--theme-hyperlink)]InvalidateControl使功能区用户界面上单个控件的缓存值失效。
[color=var(--theme-hyperlink)]InvalidateControlMso用于使内置控件失效。