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...
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
READ MORE - Memperoleh Tag Sebuah File MP3 - VB6 Code
Labels:
Multimedia
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"...
Labels:
Multimedia
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...
Labels:
API-VB6
,
Multimedia
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 = "" ...
Labels:
Multimedia
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...
Labels:
Multimedia
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"...
Labels:
Multimedia
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...
Labels:
Multimedia
Subscribe to:
Posts
(
Atom
)