Compare different audio

[LiwisJames]

Well I've asked a question similar to vb.net, but this is a little different let's go there: well I want to know if two songs are equal or similar the difference is that the first mp3 has 2 minutes and the second 4 and the ritimo of two are different one is faster another slower some next neighbor algorithim can do this in vb6 ?

I researched and there is a way to compare the frequency of files but this varies according to quality, so I thought that if the song is 27% equal is considered as the same.

Basically the files will come from two strigs:

Option Explicit

Rem MscO(MusicOne) , Msct(MusicTwo)

Dim music1 as String = "C:\windows\user\music\mscO.mp3"
Dim music2 as String = "C:\windows\user\music\mscT.mp3" 


 Rem Verify if exist files from module bas :
Rem https://www.vbforums.com/showthread.php?349990-Classic-VB-How-can-I-check-if-a-file-exists
Private Sub Command_Click()
   if FileExists(music1) Then
           if FileExists(music2) Then
             
                   REM Compare music1   with music2 frequênci           

           End if
  End if
End Sub

[Arnoutdv]

https://www.intrasonics.com/news/202...how-it-is-used

[LiwisJames]

https://www.intrasonics.com/news/202...how-it-is-used

in a search thanks to your efforts I found something relevant I will try to recreate but first I will test.

See it:

https://www.freevbcode.com/ShowCode.asp?ID=2685