首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB开发DirectDraw报自动化异常

2012-12-15 
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对象;
...
[其他解释]
自动化错误

热点排行