Jump to content

How to disable system sound on your PC


NIM
 Share

Recommended Posts

Option Explicit
Dim WSHShell, n, MyBox, p, itemtype, Title

Set WSHShell = WScript.CreateObject("WScript.Shell")
p = "HKEY_CURRENT_USER\Control Panel\Sound\"
p = p & "Beep"
itemtype = "REG_SZ"
n= "No"

WSHShell.RegWrite p, n, itemtype
Title = "System Beeps are now Disabled." & vbCR
Title = Title & "You may need to Log off/Log on" & vbCR
MyBox = MsgBox(Title,4096,"Finished")

Link to comment
Share on other sites

  • 2 months later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

×
×
  • Create New...