[Nbras]

(20-10-17, 10:50 AM)a.ahmed كتب : < Pjoject > WindowsApplication1 Properties
 < Compile > Advanced Compile Options
 Target CPU: x86


BassMOD.BASSMOD_MusicPlay

PHP كود :

Imports System.IO
Imports Un4seen.BassMOD
Public Class Form1
    Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
        BassMOD.BASSMOD_MusicStop()
        BassMOD.BASSMOD_Free()
    End Sub
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        System.IO.File.WriteAllBytes("BassMOD.dll", My.Resources.BASSMOD)
        BassMOD.BASSMOD_Init(0, 44100, BASSInit.BASS_DEVICE_DEFAULT)
        BassMOD.BASSMOD_MusicLoad(My.Resources.Orion_Nero, 0, 0, BASSMusic.BASS_MUSIC_LOOP)

        BassMOD.BASSMOD_MusicPlay()

    End Sub

End Class 


شكراً لك، أحلى تقييم و شكر