From 3c9ecd0c0bea92954876af9adfd8f6296403e572 Mon Sep 17 00:00:00 2001 From: TheUltimateHacker Date: Mon, 2 Mar 2015 18:01:07 -0500 Subject: Shutdown sounds added, along with new Windows 2000 startup and shutdown to match the actual Windows 2000 startup and shutdown sounds rather than reusing the sounds from Windows ME. --- windows 95/Windows2000.vb | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'windows 95/Windows2000.vb') 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 -- cgit v1.2.3