「Beep音の例」の版間の差分
ナビゲーションに移動
検索に移動
Starworshipper (トーク | 投稿記録) 編集の要約なし |
SyntaxHighlightにcopyの追加 |
||
| (同じ利用者による、間の2版が非表示) | |||
| 1行目: | 1行目: | ||
WindowsでBeep音を出したい時に。マクロで想定内のエラーが発生したり、ビジュアル的な反応を返せないときに、statusバーへの報告だけですと、気づかなかったり視線の移動が煩わしかったりすることがありませんでしょうか。 | |||
「ぷろーーん」と言うBeep音1つ出せるだけで、色々便利なことがあるかと思います。 | 「ぷろーーん」と言うBeep音1つ出せるだけで、色々便利なことがあるかと思います。 | ||
| 9行目: | 8行目: | ||
== ソースコード == | == ソースコード == | ||
<syntaxhighlight lang="javascript"> | <syntaxhighlight lang="javascript" copy> | ||
var wshShell = new ActiveXObject("WScript.Shell");//定義 | var wshShell = new ActiveXObject("WScript.Shell"); //定義 | ||
wshShell.Run("rundll32 user32.dll,MessageBeep"); //これを鳴らしたいタイミングの場所に挿入する | wshShell.Run("rundll32 user32.dll,MessageBeep"); //これを鳴らしたいタイミングの場所に挿入する | ||
| 16行目: | 15行目: | ||
== こうやれば喋らせることもできるようです == | == こうやれば喋らせることもできるようです == | ||
<syntaxhighlight lang="javascript"> | <syntaxhighlight lang="javascript" copy> | ||
var my_speak_obj=new ActiveXObject("SAPI.SpVoice"); | var my_speak_obj=new ActiveXObject("SAPI.SpVoice"); | ||
var mytext = "Mery is fantastic!"; | var mytext = "Mery is fantastic!"; | ||
2025年6月30日 (月) 00:55時点における最新版
WindowsでBeep音を出したい時に。マクロで想定内のエラーが発生したり、ビジュアル的な反応を返せないときに、statusバーへの報告だけですと、気づかなかったり視線の移動が煩わしかったりすることがありませんでしょうか。
「ぷろーーん」と言うBeep音1つ出せるだけで、色々便利なことがあるかと思います。
2行で簡単にBeepが出るものを見つけたのでメモします。
こちらのスレッドを参考にしました。
ソースコード[編集]
var wshShell = new ActiveXObject("WScript.Shell"); //定義
wshShell.Run("rundll32 user32.dll,MessageBeep"); //これを鳴らしたいタイミングの場所に挿入する
こうやれば喋らせることもできるようです[編集]
var my_speak_obj=new ActiveXObject("SAPI.SpVoice");
var mytext = "Mery is fantastic!";
my_speak_obj.Speak(mytext);
スポンサーリンク