2013-04-17 12 views
5

私は現在vbsスクリプトを作成していますが、スクリプトとのユーザー対話が必要です。基本的に私は2つのボタンと4つのチェックボックスが必要です(チェックボックスは重要ではありません)。VBScriptにGUIを追加

事前に感謝

+0

[このWSH VBS GUI](https://stackoverflow.com/a/47111556/2165759)のソリューションを確認してください。 – omegastripes

答えて

5

VBScriptのは、ダイアログ、唯一の多くはないとノーチェックボックスを持っている、あなたはそうするCOMオブジェクトが必要になります(とがある)が。私はしかし、VBScriptでより多くのダイアログを持っているための最善の方法は、HTAを使用している、あなたがメッセージボックスと、ここであまり知られてポップアップ

Dim WshShell, BtnCode 
Set WshShell = WScript.CreateObject("WScript.Shell") 

BtnCode = WshShell.Popup("Do you feel alright?", 7, "Answer This Question:", 4 + 32) 

Select Case BtnCode 
    case 6  WScript.Echo "Glad to hear you feel alright." 
    case 7  WScript.Echo "Hope you're feeling better soon." 
    case -1  WScript.Echo "Is there anybody out there?" 
End Select 

の例を知っていると確信しています。私はコーディに同意する一つのことで ここでは一例

<HTML><HEAD> 
    <HTA:APPLICATION 
    ID = "oApp" 
    APPLICATIONNAME = "Example" 
    BORDER = "thick" 
    CAPTION = "yes" 
    ICON = "app.ico" 
    SHOWINTASKBAR = "yes" 
    SINGLEINSTANCE = "yes" 
    SYSMENU = "yes" 
    WINDOWSTATE = "normal" 
    SCROLL = "yes" 
    SCROLLFLAT = "yes" 
    VERSION = "1.0" 
    INNERBORDER = "yes" 
    SELECTION = "no" 
    MAXIMIZEBUTTON = "yes" 
    MINIMIZEBUTTON = "yes" 
    NAVIGABLE = "yes" 
    CONTEXTMENU = "yes" 
    BORDERSTYLE = "normal" 
    > 

    <SCRIPT language="vbscript"> 
    sub SimpleExeample() 
    document.body.innerHTML = "<form name=myform><input type=checkbox name=chk1>Check me<br><br><button onclick='alert(myform.chk1.checked)'>Show if checked</button></form>" 
    end sub 
    </SCRIPT> 

</HEAD> 
<BODY onLoad="SimpleExeample()"> 
</BODY> 
</HTML> 

あなたが別の言語を選択したプログラミングを開始した場合、VBScriptのは、ほとんど死んでいます。 Rubyを見てみましょう。スタートは楽しいですが、それは楽しいです。ここ Uの例GUI

require 'green_shoes' 
Shoes.app{ 
    button("Click me!"){alert("You clicked me.")} 
} 

EDITとして靴を使用してスクリプトをルビー:私のRubyの選択肢はいくつかの質問に上昇するので、ここでのVBScriptに近い、よりtraditionelの方法は、同じサンプルを使用しています。上記のサンプルは、機能的に連鎖したプログラミング方法のためにより多く使われています。

require 'green_shoes' 
Shoes.app do 
    button("Click me!") do 
    alert("You clicked me.") 
    end 
end 
+1

ポップアップがMsgBoxに追加するのは、オプションの待機時間だけです。他のすべては同じです。チェックボックスやカスタムボタンはサポートされていません。 –

+0

私はJava言語を知っていますが、私はVBのような基本的なことをする必要があります。私はすぐにコードをテストすることはできませんが、私が家に戻ったときにテストします。ありがとう –

+0

私はそれを言っているのではありませんが、それはHTAの解決策で可能です、私はadaptetサンプルを明確に示すために – peter

関連する問題