2.インプットボックス関数をマスターする |
1.インプットボックス関数をマスターする 2. 3. 4. 5. 6. |
下記プログラムコードに関する補足・注意事項 動作確認:Windows Vista・Windows 7 (32bit) / VB6.0(SP6) Option :[Option Explicit] 参照設定:追加なし 使用 API:なし その他 : : |
1.インプットボックス関数をマスターする |
構文 MyValue = InputBox(Msg, Title,Default,Xpos,Ypos, Help, Ctxt) MyValue =入力した文字列が返る InputBox=関数名 Msg=インプットボックスに表示する文書 Title=インプットボックスのタイトル名(省略可) Default=入力文字列の初期値(省略可) Xpos=水平方向の表示位置(省略可) Ypos=垂直方向の表示位置(省略可) Help=ヘルプファイル名(省略可) Ctxt=ヘルプトピックのコンテキスト番号(省略可) 使用例 Option Explicit 'SampleNo=033 2002.05.01 Private Sub Command1_Click() Dim MyValue As String Dim strMsg As String strMsg = "メニューNo.を入力" & vbCrLf & "して下さい。" SendKeys "%{kanji}" '参考までに MyValue = InputBox(strMsg, "メニューの入力", "1") SendKeys "%{kanji}" 'うまく動作しない場合があります Label1.Caption = MyValue & "が選択されました。" End Sub 使い方はメッセージボックスとほぼ同じだが入力文字列が返ってくる。 但し、入力文字はプログラムで制御できない。(別途方法はある) 従って、入力は英数でできる単純な内容の入力の場合に使用するのが望ましい。 |
2. |
3. |
4. |
5. |
6. |
検索キーワード及びサンプルコードの別名(機能名) |
InputBox 関数の使用方法 インプットボックス関数 |