summaryrefslogtreecommitdiff
path: root/windows 95/Windows2000.vb
diff options
context:
space:
mode:
authorJamie Mansfield <[email protected]>2015-03-03 15:40:38 +0000
committerJamie Mansfield <[email protected]>2015-03-03 15:40:38 +0000
commit00a5f71b30a80ba0deac09986261244e043103ec (patch)
treea888214b53cae2e913dbd3f5de19f20f691f9585 /windows 95/Windows2000.vb
parent3ad025e3d28827c7a2491ba450766302618c8210 (diff)
parent3c9ecd0c0bea92954876af9adfd8f6296403e572 (diff)
downloadhistacom-00a5f71b30a80ba0deac09986261244e043103ec.tar.gz
histacom-00a5f71b30a80ba0deac09986261244e043103ec.tar.bz2
histacom-00a5f71b30a80ba0deac09986261244e043103ec.zip
Merge pull request #5 from TheUltimateHacker/master
Add shutdown sounds
Diffstat (limited to 'windows 95/Windows2000.vb')
-rwxr-xr-xwindows 95/Windows2000.vb10
1 files changed, 5 insertions, 5 deletions
diff --git a/windows 95/Windows2000.vb b/windows 95/Windows2000.vb
index ab92355..bb19828 100755
--- a/windows 95/Windows2000.vb
+++ b/windows 95/Windows2000.vb
@@ -10,9 +10,9 @@
Private Sub windows95_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Me.Load
desktopicons.Show()
- If My.Resources.windows_2000_boot_sound.CanRead Then
- Dim bStr(My.Resources.windows_2000_boot_sound.Length) As Byte
- My.Resources.windows_2000_boot_sound.Read(bStr, 0, My.Resources.windows_2000_boot_sound.Length)
+ If My.Resources.Windows_2000_Startup.CanRead Then
+ Dim bStr(My.Resources.Windows_2000_Startup.Length) As Byte
+ My.Resources.Windows_2000_Startup.Read(bStr, 0, My.Resources.Windows_2000_Startup.Length)
My.Computer.Audio.Play(bStr, AudioPlayMode.Background)
End If
startmenu.Hide()
@@ -263,8 +263,8 @@
taskbar.Hide()
startbutton.Hide()
- Dim bStr(My.Resources.Windows_ME_Shutdown.Length) As Byte
- My.Resources.Windows_ME_Shutdown.Read(bStr, 0, My.Resources.Windows_ME_Shutdown.Length)
+ Dim bStr(My.Resources.Windows_2000_Shutdown.Length) As Byte
+ My.Resources.Windows_2000_Shutdown.Read(bStr, 0, My.Resources.Windows_2000_Shutdown.Length)
My.Computer.Audio.Play(bStr, AudioPlayMode.WaitToComplete)
Me.Close()
End Sub