Visual Basic

Moderators: None (Apply to moderate this forum)
Number of threads: 18013
Number of posts: 55386

This Forum Only
Post New Thread
Single Post View       Linear View       Threaded View      f

Report
Problems with music. Posted by zakoschris on 12 Jan 2013 at 8:08 PM
Hello, I'am trying to find out how to make a visual studio program play music on start up. I also would like to add a little check box that pauses the music. Any kind of information would be great! I'am almost finished with my program. Google has been no help to me. I think google hates me.

EDIT: I figured it out, However because the buttons on my program make noise the music stops when the button make a noise, Is there any way to fix this?

This was my post from another forum but nobody was willing to help me.

Here is the source:

Public Class Form1 

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 
  Shell("Minecraft.exe") 
    End Sub 

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click 
  Shell("TechnicLauncher.exe") 

    End Sub 

    Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click 
  Shell("MC SOUNDS.exe") 
    End Sub 

    Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click 
  Shell("mcedit.exe") 
    End Sub 

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 

  Process.Start(Environment.ExpandEnvironmentVariables("%appdata%\.minecraft\texturepacks")) 

    End Sub 

    Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click 
  Shell("Minecraft_Server.exe") 
    End Sub 

    Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click 
  Shell("SkinTheft.exe") 
    End Sub 

    Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click 
  Shell("Launch.bat") 
    End Sub 

    Private Sub Button9_Click(sender As Object, e As EventArgs) 

    End Sub 

    Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.MouseEnter 

  My.Computer.Audio.Play(My.Resources.losticks1, AudioPlayMode.Background) 
    End Sub 

    Private Sub Button3_Click_3(sender As Object, e As EventArgs) Handles Button3.MouseEnter 

  My.Computer.Audio.Play(My.Resources.losticks1, AudioPlayMode.Background) 
    End Sub 

    Private Sub Button2_Click_2(sender As Object, e As EventArgs) Handles Button2.MouseEnter 

  My.Computer.Audio.Play(My.Resources.losticks1, AudioPlayMode.Background) 
    End Sub 

    Private Sub Button4_Click_4(sender As Object, e As EventArgs) Handles Button4.MouseEnter 

  My.Computer.Audio.Play(My.Resources.losticks1, AudioPlayMode.Background) 
    End Sub 
    Private Sub Button5_Click_5(sender As Object, e As EventArgs) Handles Button5.MouseEnter 

  My.Computer.Audio.Play(My.Resources.losticks1, AudioPlayMode.Background) 
    End Sub 
    Private Sub Button6_Click_6(sender As Object, e As EventArgs) Handles Button6.MouseEnter 

  My.Computer.Audio.Play(My.Resources.losticks1, AudioPlayMode.Background) 
    End Sub 
    Private Sub Button7_Click_7(sender As Object, e As EventArgs) Handles Button7.MouseEnter 

  My.Computer.Audio.Play(My.Resources.losticks1, AudioPlayMode.Background) 
    End Sub 
    Private Sub Button8_Click_8(sender As Object, e As EventArgs) Handles Button8.MouseEnter 

  My.Computer.Audio.Play(My.Resources.losticks1, AudioPlayMode.Background) 
    End Sub 

    Private Sub Label1_Click(sender As Object, e As EventArgs) 

    End Sub 

    Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked 

  Try 
    System.Diagnostics.Process.Start("http://www.planetminecraft.com/member/zakoschris/") 
  Catch 
    'Code to handle the error. 
  End Try 
    End Sub 

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
  My.Computer.Audio.Play(My.Resources.Knob, AudioPlayMode.BackgroundLoop) 

    End Sub 
End Class  




 

Recent Jobs

Official Programmer's Heaven Blogs
Web Hosting | Browser and Social Games | Gadgets

Popular resources on Programmersheaven.com
Assembly | Basic | C | C# | C++ | Delphi | Flash | Java | JavaScript | Pascal | Perl | PHP | Python | Ruby | Visual Basic
© Copyright 2011 Programmersheaven.com - All rights reserved.
Reproduction in whole or in part, in any form or medium without express written permission is prohibited.
Violators of this policy may be subject to legal action. Please read our Terms Of Use and Privacy Statement for more information.
Operated by CommunityHeaven, a BootstrapLabs company.