08-01-14, 04:31 AM
- Declared a variable of type Integer in statements section
- Then add audio file to My.Resourcesis called ringout
- Set Timer Interval property = 60000
- Type the following code in your timer Tick Event



كود :
Dim A As Integer = 0- Set Timer Interval property = 60000
- Type the following code in your timer Tick Event
كود :
A += 1
If A = 45 Then
A = 0
My.Computer.Audio.Play(My.Resources.ringout, AudioPlayMode.BackgroundLoop)
End If


{ يَرْفَعِ اللَّهُ الَّذِينَ آمَنُوا مِنكُمْ وَالَّذِينَ أُوتُوا الْعِلْمَ دَرَجَاتٍ }
" Mohamed M. Bedair - " Abu Anas
Genius Live , Egypt

