[Source] Make a BGM changer
If you've seen/downloaded my BGM changer then you should know how you use this. Otherwise go get it to see how you can use this code.
Use it, leech it, expand on it, whatever but PLEASE give me credit as this code is 100% mine.
Code:
'BGM Changer for Combat Arms
`By Samueldo
`If you really badly want to leech this, then go ahead BUT give me credit or I will find you and murder you.
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
`Check the folder exists
If Dir(TextBox1.Text + "\Game\BGM\") <> "" Then
`Make sure that you can edit the BGM file
System.IO.File.SetAttributes(TextBox1.Text + "\Game\BGM\BGM_LOOP.mp3", System.IO.FileAttributes.Normal)
`Rename the original BGM file so you still have it for emergencies
Rename(TextBox1.Text + "\Game\BGM\BGM_LOOP.mp3", TextBox1.Text + "\Game\BGM\BGM_LOOP_2.mp3")
`Move the new music file
IO.File.Move(TextBox2.Text + TextBox3.Text, TextBox1.Text + "\Game\BGM\")
`Rename the new music file
Rename(TextBox1.Text + "\Game\BGM\" + TextBox2.Text, TextBox1.Text + "\Game\BGM\BGM_LOOP.mp3")
Else
`If it doesn't work, this will be shown
Label6.Text = "Failed!"
End If
`Show a success message
Label6.Text = "Replaced!"
End Sub

That would be nice
so stfu