VB6中的后期绑定DirectX DirectSound

Question

我正在开发一个需要在WindowsXP和Windows7上运行的DirectSound应用程序。使用的对象只是声音缓冲区，但目前是早期绑定的：

Private dx As DirectX8  
Private ds As DirectSound8 
Private mdsBuf As DSBUFFERDESC
Private mdsBuffer(7) As DirectSoundSecondaryBuffer8 

首先，我如何使用CreateObject进行后期绑定？什么是ProgId？我猜是这样的：

Dim dx As Object
Set dx = CreateObject("DIRECT.DirectX8.0")

其次，我相信Windows7使用DirectX 11.是否有相同的ProgId？或者对象模型不同吗？

谢谢！

Answer 1

您是否已阅读Visual Basic 6.0 DirectX applications fail to run on Windows Vista and later了？

结果是不再支持VB6中的DirectX。