[已解决]谢谢那么的帅老师。能否直接打开系统工具界面？

lhj323323

老师：
能否通过VBA按纽打开操作系统中的“系统工具”界面，
常规的打开该界面的路径如下：
开始菜单——附件——系统工具——系统信息——directx诊断工具

最佳答案

月排行榜 / 总排行榜

那么的帅

2011-11-21 16:23

或者
RetVal = Shell("C:\Windows\System32\Dxdiag.exe", vbNormalFocus)

跳转到最佳答案楼层

那么的帅

    Shell "C:\Windows\System32\Dxdiag.exe"

那么的帅

或者
RetVal = Shell("C:\Windows\System32\Dxdiag.exe", vbNormalFocus)

lhj323323

那么的帅 发表于 2011-11-21 16:23
或者
RetVal = Shell("C:\Windows\System32\Dxdiag.exe", vbNormalFocus)

那么的帅老师：
RetVal = Shell("C:\Windows\System32\Dxdiag.exe", vbNormalFocus)

此句提示变量未定义，
我加了一句
dim RetVal
最好该设成什么类型呢？

lhj323323

那么的帅 发表于 2011-11-21 16:23
或者
RetVal = Shell("C:\Windows\System32\Dxdiag.exe", vbNormalFocus)

设成如下类型对不对？
Dim retval As Boolean

或是
Dim retval As long