Source Coding Aplikasi Buka Tutup CD Drive/CD Rom di Visual Basic 6.0

Source Coding Aplikasi Buka Tutup CD Drive/CD Rom di Visual Basic 6.0

Pada kesempatan ini TeknoTips.NET akan mengulas tentang "" dengan judul artikel "Source Coding Aplikasi Buka Tutup CD Drive/CD Rom di Visual Basic 6.0".

Source Coding Aplikasi Buka Tutup CD Drive - CD Rom | Pada Pembelajaran VB 6.0 kali ini akan dibahas mengenai cara membuat Aplikasi Buka Tutup CD / DVD Drive atau CD Rom pada VB 6.0
Source Coding Aplikasi Buka Tutup CD Drive - CD Rom

Berikut langkahnya :
Buatlah sebuah Project VB 6.0 dengan ditambahkan Form1 dan Module

Berikut Koding untuk Module1
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

dan Berikut untuk Form1
Source Coding Aplikasi Buka Tutup CD Drive - CD Rom
Gambar diatas hanya ditambahkan Command1 dan Command2
Private Sub Command1_Click()
  retvalue = mciSendString("set Cdaudio door open", returnstring, 127, 0)
End Sub

Private Sub Command2_Click()
  retvalue = mciSendString("set Cdaudio door closed", returnstring, 127, 0)
End Sub

Silahkan di Run Aplikasinya:)

Tag : Source Coding Aplikasi Buka Tutup CD Drive - CD Rom

Keyword : Source Code VB6,
Untuk mendapat notifikasi setiap artikel terbaru, masukkan e-mail anda disini : Tuliskan komentar relevan anda dibawah ini dengan jelas & sopan, sesuai dengan topik ulasan mengenai Source Code VB6 Terbaru 2019.

Untuk menghindari spam dan tautan aktif, komentar akan dimoderasi. Dapatkan balasan dari melalui e-mail anda :

Komentar artikel "Source Coding Aplikasi Buka Tutup CD Drive/CD Rom di Visual Basic 6.0"

Posting Komentar

Iklan Atas Artikel

Iklan Tengah Artikel 1

Iklan Tengah Artikel 2

Iklan Bawah Artikel