CDROM Açma- Kapama

'Programlama' forumunda ...... tarafından 7 Ağu 2009 tarihinde açılan konu

Konu etiketleri:
  1. ......

    ...... Misafir

    Forma iki tane command ekleyin ve şu kodları yazın...


    Kod:
    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
     
    ......, 7 Ağu 2009
    #1

Bu Sayfayı Paylaş