我如何使用VB.NET弹出CD，DVD-ROM [英] How I can eject cd, dvd-rom using VB.NET

问题描述

如何使用VB.NET弹出cd，dvd-rom

How I can eject cd, dvd-rom using VB.NET

推荐答案

经过广泛的谷歌搜索(十秒钟)，我发现了这一点...



以下代码可让您打开和关闭CD-ROM驱动器

After extensive googling (ten seconds) I found this...



The following code lets you open and close a cd rom drive

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

Private Sub cmdOpenCD_Click()
Dim lRet As Long
    lRet = mciSendString("set CDAudio door open", returnstring, 127, 0)
End Sub
Private Sub cmdCloseCD_Click()
Dim lRet As Long
    lRet = mciSendString("set CDAudio door closed", returnstring, 127, 0)
End Sub

希望对您有所帮助

Hope it helps

尝试 VB .NET弹出CD [

使用以下链接将为您提供帮助

使用此

问候
koolprasad2003:)

Use following link will help you

Use This

regards
koolprasad2003 :)

这篇关于我如何使用VB.NET弹出CD，DVD-ROM的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！