VB6 迁移 - Windows Server 2019 上的图标显示为黑色轮廓

Question

我正在迁移一个使用 ImageList 和 Image 控件来显示图标的 VB6 应用程序。该应用程序在 Windows Server 2008 R2 上正常运行，但当我在 Windows Server 2019 上运行它时，图标有黑色轮廓，以前不是这样的。

有人在迁移 VB6 应用程序时遇到类似的问题吗？

Private Sub Form_Load()
    ' Initialize ImageList control
    ImageList1.ListImages.Add , , LoadPicture("icon.ico")

    ' Assign an icon from ImageList to an Image control
    Image1.Picture = ImageList1.ListImages(1).Picture
End Sub

我怀疑这可能与 VB6 和较新 Windows 版本之间的渲染问题或兼容性问题有关。

Answer 1

最好迁移到 twinBASIC 编程。 它向后兼容VB6并导入VB6源代码和表单。