有没有什么办法可以用 Dragon NaturallySpeaking 的高级脚本弹出 CD-ROM 驱动器?
问问题
34 次
1 回答
2
您可以使用 Windows 多媒体 API(也称为 WinMM):
' From Larry Allen
' https://www.knowbrainer.com/forums/forum/messageview.cfm?catid=12&threadid=12153&highlight_key=y&keyword1=eject
' http://archive.is/Y2ouS
' Tested with Dragon NaturallySpeaking 12.5 with Windows 7 SP1 x64 Ultimate
Declare Sub mciSendStringA Lib "winmm.dll" (ByVal lpstrCommand As String, _
ByVal lpstrReturnString As String, ByVal uReturnLength As Long, _
ByVal hWndCallback As Long)
Sub Main
Dim dummy As String
mciSendStringA "Set CDAudio Door Open", dummy, 0, 0
End Sub
于 2017-06-04T16:34:33.593 回答