宜汇国际sgl出金多久:怎么找回桌面光驱按键!

来源:百度文库 编辑:高校问答 时间:2024/05/06 20:04:30
我的光驱是在键盘上控制的,由于一次不小心将桌面上的光驱图标搞丢了,现在每次都是用手推进去的,有没有什么办法将图标找出来,不用手推进去?
光驱是在键盘上控制的意思就是:
我要用键盘上的按键来开和关光驱!!

不明白你说的:光驱是在键盘上控制是什么意思。
一般搞丢光驱图标,自己做一个就是了,很简单:
在桌面上点右键,选 新建-》快捷方式
出来一个对话框,点 浏览 ,在“我的电脑”中选自己的光盘,点对话框的“下一步”,再点“完成”
好,看桌面是不是多了一个光驱的图标?
如果想让图标出现在任务栏旁的快速启动栏,只需要按左键拖动桌面的光驱图标到那里就可以了,OK?

首先,新建一个工程,在通用中添加下面的声明代码:
'声明
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
然后,在 Form 的 Load 事件中添加下面的代码:
Private Sub Form_Load()
mciSendString "open cdaudio alias cd wait shareable", 0, 0, 0
'光驱关闭
mciSendString "set cd door closed", 0, 0, 0
Unload Me
End Sub
最后,把工程编译成 cdClose.exe,将其放在桌面上,双击 cdClose.exe 将使光驱关闭,并自动关闭程序.
若把 Form 的 Load 事件换成下面的代码,则能使光驱弹出:
Private Sub Form_Load()
mciSendString "open cdaudio alias cd wait shareable", 0, 0, 0
'光驱弹出
mciSendString "set cd door open", 0, 0, 0
Unload Me
End Sub
以上程序在 VB5 和 VB6 中运行通过