在VB程序中怎么弹出和关闭光驱?

dusj 2000-05-23 09:49:00
在程序中用什么方法可以弹出和关闭光驱?
请给出完整的函数原型. thank you.
...全文
129 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
Chen_Lin 2000-05-25
  • 打赏
  • 举报
回复

Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" ( _
ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, _
ByVal hwndCallback As Long) As Long

Dim Ret As Long
Dim RetStr As String
'打开
Ret = mciSendString("set CDAudio door open", RetStr, 0, 0)
'关闭
Ret = mciSendString("set CDAudio door closed", RetStr, 0, 0)

King 2000-05-24
  • 打赏
  • 举报
回复
用WINAPI才可以实现的,CSDN的VB专题有例子。

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧