c++ - 初始化COM对象/将VB代码转换为C++

任何人都可以将以下代码转换为C++吗？这完全有可能还是缺少重要信息？

昏暗的激光作为对象
子EnableLaser
‘如果尚未创建激光对象
如果没有激光，那
设置Laser = CreateObject(“NWLaserXControl.NWLaserX”)
万一
如果Laser.Initialize然后
Laser.RepRate = 10′将重复频率设置为10Hz
Laser.LaserEnabled = True'打开激光电源，准备好
万一
结束子

最佳答案

// if (CoInitialize(0) == S_OK)
{
    CComPtr<INWLaserX> pMyPtr = NULL;

    CLSID clsid = IID_NULL;
    CLSIDFromProgID("NWLaserXControl.NWLaserX");

    if (pMyPtr.CoCreateInstance(clsid) == S_OK)
    {
         pMyPtr->put_RepRate(10);
         pMyPtr->put_LaserEnabled(TRUE);
    }

   // CoUnInitialize();
}