WIA，Vista和VB6。这段代码有用吗？

Question

基本上这里的限制是我必须使用WIA，因为我试图让我的扫描仪软件在Windows 7和Vista中运行。如果我可以在VB6中这样做，那将是更好的（如果真的更可取）。 现在这个代码我编译了所有内容，但是当我运行它时，我得到错误“没有所选类型的WIA设备可用”。我开始怀疑我的扫描仪不兼容WIA。

有人可以确认此代码应该有效吗？ （需要使用任何WIA设备而不仅仅是扫描仪）

Dim WIADia As WIA.CommonDialog
Dim Scan As WIA.DeviceManager


Set WIADia = New WIA.CommonDialog
Set Scan = WIADia.ShowSelectDevice(WIA.WiaDeviceType.UnspecifiedDeviceType, True, False)
WIADia.ShowAcquisitionWizard (Scan)

谢谢！

Answer 1

        WIA.CommonDialog WIADia;
        Device Scan;

        WIADia = new WIA.CommonDialog();
        Scan = WIADia.ShowSelectDevice(WiaDeviceType.UnspecifiedDeviceType, true, false);
        WIADia.ShowAcquisitionWizard(Scan);