为什么使用vb shell函数 启动帝国时代2会出现“无法初始化图像系统”

是不是要加什么参数
代码如下
Private Sub Command1_Click()
Dim a As Double
a = Shell("E:\aoe2\AOGE2AI\empires2.exe", vbMaximizedFocus)
End Sub
肯定双击运行没问题！是双击可执行文件!vb shell执行之后，先黑屏，像是进了游戏，然后弹出对话框“无法初始化图像系统，请确定你的显卡与DirectDraw兼容”第一种方法不行

vb中shell函数使用问题 为什么使用vb shell函数 启动帝国时代2会出现“无法初始化图像系统” 如何使用VB中的Shell函数？有什么功能？ 关于VB中的shell函数 vb中shell函数问题 VB中 shell 函数的问题 VB问题（shell函数与inputbox函数）？ vb shell VB中的shell函数是干什么的？怎么用啊？ 请教各位VB高手 关于Shell函数的问题