Cara Menambahkan Lagu Pada Form VB

Advertisemen

Gak Banyak Basa basi
langsung ja buka VB ente
pilih standart.exe
buka componen atau CTRL+T
lalu tambahkan componen windows media player trus tambahkan sebuah timer ke dalam form

masukin code dibawah ini ke jendele code editor

Dim Welcome As String
Welcome = MsgBox("Wellcome To Computika Project Bro", vbInformation, "c0mput1ka")
WindowsMediaPlayer1.URL = App.Path & "\judul lagu mu di sini.mp3" 

Dim rgnMain As Long

nBytes = 100

LoadBytes

rgnMain = ExtCreateRegion(ByVal 0&, nBytes, bytRegion(0))
SetWindowRgn Me.hwnd, rgnMain, True



End Sub
Private Sub Timer1_Timer()
WindowsMediaPlayer1.Controls.play

End Sub

Cat : setelah dicompile menjadi exe letakan file ini bersama lagu tadi dalam folder yang sama

Advertisemen