Jump to content
Forum Windows-az.com

CD/DVD Aç-Bağla


Ʌüsal

Recommended Posts

Forma 2 ədəd Button əlavə edin.Forma klik edin və aşağədakı kodu daxil edin.

 

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

 

Private Sub Command1_Click()

mciExecute ("set cdaudio door open") 'Ac

End Sub

 

Private Sub Command2_Click()

mciExecute ("set cdaudio door closed") ' Bagla

End Sub

 

1308216147_5.jpg

- Laptop ve Desktop Anakartlarin temiri

- BIOS yazilmasi

- Sifreli SuperUser BIOS-larin silinmesi

- Kicik chiplerin deyisidrilmesi

- BGA Chiplerin deyisdirilmesi (GPU/CPU/FCH/PCH/HM ve s)

Link to comment
Share on other sites

Proqramlar telegramda

Sohbete katıl

Şimdi mesajını gönderebilir ve daha sonra kayıt olabilirsin. Bir hesabın varsa, hesabınla göndermek için şimdi oturum aç.

Misafir
Bu konuya yanıt ver...

×   Zengin metin olarak yapıştırıldı.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Önceki içeriğiniz geri yüklendi.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • loading...
×
×
  • Create New...