Windows および Windows CE で有効です。
InputBox 関数はメッセージ ボックスを作成、表示、および操作します。 メッセージ ボックスにはアプリケーションで定義されたプロンプト、タイトル、およびアプリケーションで定義されたデフォルト値が入ったテキスト ボックス、さらに[OK]ボタンや[キャンセル]ボタンが含まれます。
このその他の関数の形式は、以下のとおりです。
InputBox( prompt as String, title as String, default as String) as Boolean
表示するプロンプトを示します。
メッセージ ボックスのタイトルを指定します。
デフォルト プロンプト入力を指定します。 デフォルトが変数でない場合は、構文エラーが表示されます。
注: 入力ボックスが前面に配置されていません。
[OK]ボタンを選択した場合は、True が返され、テキスト ボックスの内容がデフォルト変数にコピーされます。 [キャンセル]ボタンを選択した場合は、False が返され、デフォルト変数は変更されません。
例: InputBox 関数
以下に、InputBox の使用例を示します。
Dim TargetPath, Question as string
TargetPath=WindowsDir
Question="Please specify the directory to use for installation"
if InputBox(Question,"Install",TargetPath) then
' Place code for actual installation here...
MessageBox("Installation completed")
else
MessageBox("Installation aborted")
End if
End:
|
Copyright © 2013 CA.
All rights reserved.
|
|