diff options
| author | TheUltimateHacker <[email protected]> | 2015-03-02 18:01:07 -0500 |
|---|---|---|
| committer | TheUltimateHacker <[email protected]> | 2015-03-02 18:01:07 -0500 |
| commit | 3c9ecd0c0bea92954876af9adfd8f6296403e572 (patch) | |
| tree | a888214b53cae2e913dbd3f5de19f20f691f9585 /windows 95/Windows98.vb | |
| parent | 70be68814244c074e26916979f0aae1833719d93 (diff) | |
| download | histacom-3c9ecd0c0bea92954876af9adfd8f6296403e572.tar.gz histacom-3c9ecd0c0bea92954876af9adfd8f6296403e572.tar.bz2 histacom-3c9ecd0c0bea92954876af9adfd8f6296403e572.zip | |
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.
Diffstat (limited to 'windows 95/Windows98.vb')
| -rwxr-xr-x | windows 95/Windows98.vb | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/windows 95/Windows98.vb b/windows 95/Windows98.vb index e86f07b..4b484d3 100755 --- a/windows 95/Windows98.vb +++ b/windows 95/Windows98.vb @@ -163,8 +163,16 @@ startmenu.Hide()
End Sub
- Private Sub ShutdownToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ShutdownToolStripMenuItem1.Click
- Title_Screen.Close()
+ Private Sub ToolStripMenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ShutdownToolStripMenuItem1.Click
+ startmenu.Hide()
+ desktopicons.Hide()
+ taskbar.Hide()
+ startbutton.Hide()
+
+ Dim bStr(My.Resources.Windows_98_Shutdown.Length) As Byte
+ My.Resources.Windows_98_Shutdown.Read(bStr, 0, My.Resources.Windows_98_Shutdown.Length)
+ My.Computer.Audio.Play(bStr, AudioPlayMode.WaitToComplete)
+ Me.Close()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
|