サンプルプログラム
下のスクリプトをメモ帳などで入力し、拡張子に"vbs"を付けて保存して実行してください。例("BoxTest.vbs")
文字列の入力と表示(ダイアログボックス) |
str=InputBox("文字を入力してください") '文字列は""で指定します。 If str="" Then WScript.Quit '空白は、全て半角スペースを使います。(全角ではエラーになります。) End If MsgBox "入力した文字は [" & str & "] です。",vbOKOnly + vbInformation,"文字列の表示" |
説明 |
str=InputBoxで入力した文字列が変数strに入ります。 If str="" Thenはstrの値が空ならばWScript.Quitでプログラムを終了します。 End Ifで条件式を終える MsgBoxで変数strの内容を表示している。 vbOKOnly + vbInformation OKボタンと情報メッセージアイコンの表示を(合計値)指定しています。 |
サンプルは見やすくする為に全角スペースで字下げを行っています。
コピーしてサンプルを実行される場合は半角スペースに直して行って下さい。
詳しい情報はこのコーナーのTopページからか次のリンクからどうぞ
Microsoft VBScript Online Help VBScript ユーザーズ ガイドをご覧ください。