Showing posts with label Multimedia. Show all posts
Showing posts with label Multimedia. Show all posts

Thursday, June 14, 2012

Memperoleh Tag Sebuah File MP3 - VB6 Code

Option ExplicitPrivate Type eTagMP3 TagIdent As String * 3 Title As String * 30 Artist As String * 30 Album As String * 30 Year As String * 4 Comment As String * 30End TypePrivate TagMP3 As eTagMP3Private Function GetMP3Tag(Path As...
READ MORE - Memperoleh Tag Sebuah File MP3 - VB6 Code

Tuesday, May 29, 2012

Memainkan file MP3 dengan Windows API di Visual Basic 6

Private 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 Dim lagu As String lagu = "D:\musik.mp3"...
READ MORE - Memainkan file MP3 dengan Windows API di Visual Basic 6

Monday, May 28, 2012

Memeriksa Keberadaan Sound Card Pada Komputer

Di bawah ini merupakan fungsi untuk mengetahui apakah komputer memiliki souncard atau tidak.Option Explicit Private Declare Function waveOutGetNumDevs Lib "winmm.dll" ) As Long Public Function IsExistSoundCard() As Boolean Dim...
READ MORE - Memeriksa Keberadaan Sound Card Pada Komputer

Menjalankan File .MP3 Menggunakan Microsoft Multimedia Control

Option Explicit Private Sub Command1_Click() MMC.FileName = OpenFile Me.Caption = MMC.FileName MMC.Command = "open" MMC.Command = "play" End Sub Private Function OpenFile() As String With CommonDialog1 .FileName = "" ...
READ MORE - Menjalankan File .MP3 Menggunakan Microsoft Multimedia Control

Sunday, May 27, 2012

Fungsi Untuk Menjalankan File .wav Menggunakan Visual Basic 6.0

Di bawah ini merupakan fungsi untuk menjalankan file .wav dengan menggunakan Visual Basic 6.0 disertai dengan beberapa argumen yang dibutuhkan.Option Explicit Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName...
READ MORE - Fungsi Untuk Menjalankan File .wav Menggunakan Visual Basic 6.0

Sunday, April 4, 2010

VB6 Code - Menjalankan File .mp3

Di bawah ini merupakan contoh menggunakan Microsoft Multimedia Control yang digunakan untuk menjalankan file .mp3 menggunakan VB6.Option ExplicitPrivate Sub Command1_Click() MMC.FileName = OpenFile Me.Caption = MMC.FileName MMC.Command = "open"...
READ MORE - VB6 Code - Menjalankan File .mp3

Saturday, April 3, 2010

VB6 Code - Menjalankan File .wav Menggunakan Visual Basic

Di bawah ini merupakan fungsi VB6 untuk menjalankan file .wav dengan menggunakan Visual Basic 6.0 disertai dengan beberapa argumen yang dibutuhkan.Option ExplicitPublic Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName...
READ MORE - VB6 Code - Menjalankan File .wav Menggunakan Visual Basic