vb6 - 动态添加控件的并排(regfree)问题
问题描述
我们迁移我们的 vb6 项目以使用 sidebyside(regfree) 技术 ....但是在动态添加控件以形成如下问题时遇到问题:
Private WithEvents tmpCtl As VBControlExtender
Private Sub UserControl_Initialize()
Set tmpCtl = Controls.Add("Project2.UserControl1", "ctl")
With tmpCtl
Set .Container = Me
.Visible = True
End With
End Sub
当使用 tmpCtl 对象时:
tmpCtl.Properties
我们收到错误“对象不支持此属性或方法”
我发现人们也有同样的问题(缺少方法的奇怪案例:SXS 和 Controls.Add 导致“对象不支持此属性或方法”?)并建议实施“直接用户控制”。
有人可以知道如何在 vb6 代码中实现这一点吗?我们如何解决 sxs 和动态添加控件到表单的问题?
可以给我们相同的解决方案示例如何解决这个问题?
解决方案
推荐阅读
- intershop - 带参数的管道不会调用
- vue.js - 如何在 Cypress 中创建基于角色的测试?
- postgresql - 使用继承进行元数据迁移是否安全?
- android - Okhttp4,无法访问“正文”:它在“响应”中是包私有的
- javascript - 为什么第二个 then in promise 更早起作用?
- c# - “Max Product of 3”问题的代码性能
- python - 无法使用 pip 卸载 python 包(Linux)
- c++ - 是否可以检查变量是否位于 L1/L2/L3 缓存中
- javascript - 无法移动口罩?无法获取掩码元素的 bbox
- postgresql - wal-g backup-push 尝试使用错误的数据库