2015-10-02 13 views
5

VBScriptにWindowsビジュアルスタイルを使用するように指示することができます。これにより、フォームコンポーネントは従来のものよりもWindowsのテーマを使用します。たとえば、MsgBoxにクラシックな3D矩形を表示するのではなく、スタイル付きのボタンを表示させる場合などです。VBScriptはWindowsビジュアルスタイルを使用します

この:

enter image description here

+1

スクリプトを実行するためにどのようなプログラムを使用していますか? Windowsスクリプトホスト? HTA?ブラウザ? –

+0

@DonaldDuck Windowsスクリプトホスト(wscript.exe)。 –

答えて

1

HTAアプリケーションでは、単純なmetaタグwilビジュアルスタイルをオンにしてください:

<META HTTP-EQUIV="MSThemeCompatible" CONTENT="yes"> 

このトリックは、Googleの検索結果から完全に消えてしまいましたが、このS/Oの質問は一番上に残っています。

VBScript MsgBoxが犯人である場合、ビジュアルスタイルを使用するにはwscript hostを変更する必要があります。しかし、ポストのために、HTAファイルを使用してMsgBoxの独自のレプリカを簡単に作成し、ビジュアルスタイルを有効にすることができます。私はあなたのスクリーンショットをオフに基づいて正確なレプリカを作成しました:

msgbox.hta:

<html> 
<head> 
<title>MsgBox Title</title> 
<META HTTP-EQUIV="MSThemeCompatible" CONTENT="yes"> 
<HTA:APPLICATION ID="Custom MsgBox" 
    APPLICATIONNAME="Custom MsgBox" 
    BORDER="thin" 
    BORDERSTYLE="normal" 
    CAPTION="yes" 
    CONTEXTMENU="no" 
    ICON="" 
    MAXIMIZEBUTTON="no" 
    MINIMIZEBUTTON="no" 
    SHOWINTASKBAR="no" 
    SINGLEINSTANCE="no" 
    SYSMENU="yes" 
    SCROLL="no" 
    WINDOWSTATE="normal"/> 
<script language="javascript">window.resizeTo(400,170);</script> 
</head> 
<body style="font-family:Arial;padding:20px 0 0 20px;background:rgb(180,240,230)"> 
<p>MsgBox Body; lorem ipsum dipsum</p><br> 
<div align="right"><button onclick="window.close()" style="width:80px">OK</button></div> 
</body> 
</html> 

それはあなたがしたい場合、あなたは、右のバッチスクリプトからHTAファイルにそれをecho可能性が十分にどこに小さいです。

こちらがお役に立てば幸いです。

関連する問題