' InputBoxEx
'  VBに標準で入っているInputBox関数は挙動がおかしいので自作したもの
'  ヘルプ関係が未対応だが、
'  入力文字数の制限や、キャンセルが押されたときの戻り値の設定もできる。

InputBoxEx.basとInputBoxEx.frmをプロジェクトに追加して使います。
使える関数は、次の唯一つです。

InputBoxEx(Prompt, [Title], [Default], [XPos], [YPos], [HelpFile], [Context], [Length])
　Prompt→表示されるメッセージ
　Title→ウィンドウタイトル
　Default→最初に入力されている値、キャンセル時の戻り値
　XPos→X座標(省略すると呼び出しフォームの中央)
　YPos→Y座標(省略すると呼び出しフォームの中央)
　HelpFile→未対応です
　Context→未対応です
　Length→入力できるテキストの最大文字数
　戻り値→String型、キャンセル時はDefault

制作：ときお
サイト：http://tgws.fromc.jp/tokio6/
公開日：04/02/22