VB开发DirectDraw报自动化异常
VB开发DirectDraw报自动化错误在VB中开发DirectDraw,出现如下错误:代码:Option ExplicitPublic r, objDX A
VB开发DirectDraw报自动化错误
在VB中开发DirectDraw,出现如下错误:
代码:
Option Explicit
Public r, objDX As New DxVBLib.DirectX7, objDXD As DxVBLib.DirectDraw7
Sub Main()
CreateDXD
End Sub
Sub CreateDXD()
Set objDXD = objDX.DirectDrawCreate(objDX.CreateNewGuid)
End Sub
错误:
-2005532111(88760231)
自动化错误
[最优解释]直接这样声明试试
Dim dx As New DirectX7 'DirectX对象;
Dim dd As DirectDraw7 'DirectDraw对象;
...
set dd = dx.DirectDrawCreate("") '生成DirectDraw对象;
...
[其他解释]自动化错误