Cdrom Açma Kapama İşlemi Yapma

Cdrom Açma- Kapama sistemini yapmak için Formun bulunduğu yere 2 tane command ekleyerek  aşağıda bulunan kodları ekleyiniz.

Private Declare Function mciExecute Lib “winmm.dll” (ByVal lpstrCommand As String) As Long

Private Sub Command1_Click()


mciExecute (“set cdaudio door open”) ‘Cdrom aç
End Sub

Private Sub Command2_Click()
mciExecute (“set cdaudio door closed”) ‘ Cdrom kapat
End Sub

Kategori :Programlama Dilleri, Visual Basic
1 yorum

Yorum Yaz

  1. Comment by hakan697
    Şubat 9th, 2010

    pardon ama hangi formdan bahsediyorsunuz. bu form bilgisayarın neresinde bulunuyor. biraz daha açıklayıcı olursanız sevinirim.