- ベストアンサー
inputboxのことで質問です！
こんにちわっ！またまたプログラミングのことで質問です！ inputboxを使うときにinputbox(メッセージ、タイトル、テキストボックスの文字列） という風に使うんですけど、この最後のテキストボックスの文字列の事がよくわかりません！ ０を使ったり１を使ったりと。。。 教えてください！よろしくお願いします！
- tamatamaneginegi
- お礼率38% (161/423)
- Visual Basic
- 回答数3
- ありがとう数3
- みんなの回答 （3）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (2)
- finalanswer
- ベストアンサー率60% (182/303)
「テキストボックスの文字列」というのは、InputBoxを実行した際のウィンドウにあるテキストボックスの既定値（最初から入力されている文字列）です。 InputBoxのパラメータに「テキストボックスの文字列」を指定しなかった場合は、既定値は空の文字列（何も入力されていない）です。
お礼
回答ありがとうございます！ 参考URLまで探してもらって、かなり感謝しております！ これからもよろしくおねがいします！
- TAGOSAKU7
- ベストアンサー率65% (276/422)
Call InputBox("説明", "タイトル", "最初に表示される文字列") だったと思うのですが、０／１とは？
お礼
回答ありがとうございました！ まだ始めたばっかで超初心者です！ これからもよろしくおねがいします！
関連するQ&A
- InputBoxについて
Sub test1() Dim tmp As String tmp = Application.InputBox("testです") End Sub Sub test2() Dim tmp As String tmp = InputBox("testです") End Sub この二つのコードを比較すると、 test1の方は、ダイアログボックスのタイトルに「入力」が表示され、 四角いインプットボックスが表示されます。 test2の方は、私がいつも使っているインプットボックスなのですが、 「tmp =」と 「InputBox」の間に何かコードが省略されてるのでしょうか？ Application.を付ける事によって、形が変わってしまうのでしょうか？ また、オブジェクトブラウザを見ると 【１】Function InputBox(Prompt As String, [Title], [Default], [Left], [T Excel.Application のメンバ 【２】Function InputBox(Prompt, [Title], [Default], [XPos], [YPos], [Help VBA.Interaction のメンバ がありましたが、 test1、test2それぞれどちらの事なのでしょうか？
- ベストアンサー
- オフィス系ソフト
- VC2005でInputBox関数？
VisualC++2005を使っていますが、VisualBasicのようなInputBox関数はあるのでしょうか？ プログラムが止まり、メッセージを出して、 文字列入力し、OKボタンを押すと、 入力した文字列を使ってプログラムが流れる 有れば便利だと思うのですが・・・
- ベストアンサー
- C・C++・C#
- VB2010 InputBoxを自作したいのですが
InputBoxのテキストは字が小さいのでフォームにテキストボックスを貼り付けて作ったのですがプログラムがそこで止まりません。 ＩｎｐｕｔＢｏｘは何かを入力しＯＫボタンを押してから次に進みますがこの様にするにはどうしたら良いのでしょうか。
- ベストアンサー
- Visual Basic
- VBSでInputBoxの戻り値は256文字まで？？！！
Inputboxで入力された文字列を テキストファイルにするスクリプトを組んでいるのですが、 完成間近になってうまく出来ていないことに気が付きました。 それはInputboxの戻り値がなぜか256文字？までしか取れないみたい、ということです。 たとえばこんな感じ a=inputbox("aaa") msgbox a とやると256文字以上は出ません・・。 aに直接代入した場合には大丈夫なのでInputboxの問題のようなきがします。 ＷＥＢでいろいろ検索してみたのですが、そのような制限があるという記述を見つけられませんでした・・。 何か解決方法があったら、思いつきでもいいので教えてください。 （代替手段でもいいです）
- ベストアンサー
- Visual Basic
- Win32でInputBoxを実装するには？
Win2000+ActivePerl 5.8.7 の環境です。 PerlでGUIということで、メッセージボックスであれば、次のようにして実現できました。 ------------ use Win32; my $msg = $ARGV[0]; my $icon = $ARGV[1]; my $caption = $ARGV[2]; my $result = Win32::MsgBox($msg, $ico, $caption); print "$result\n"; ------------ これと同様に、InputBoxのようなこと -------------------------------- ダイアログウィンドウを表示し、文字列の入力を促して、 Enterすると、スクリプト内の関数戻り値として、その文字列を 取得できるようなもの。 -------------------------------- が出来ないでしょうか。 ネット上色々と探し回ってみましたが、単純には見つかりませんでした。 （ Haven't yet implemented function inputbox...） 何か自分で組み合わせて作成する必要があるのでしょうか？ （DOS窓経由であれば、単純に、$txt=<STDIN>; で取れるのですが） よろしくご教示ください。
- ベストアンサー
- Perl
- EXCEL VBAのInputBox
VBA初心者のため、質問がうまくできないかもしれませんが よろしくお願いします。 ユーザーから文字列を入力してもらうためInputBoxを使用しました。キーボードのDを押したら、Input Boxを表示させるようにしたのですが、入力エリアにDが表示されてしまいます。また、プログラムを実行後から押されたキーの文字もすべて入力エリア表示されてしまいます。入力エリアを空白の状態で表示させたいのです。方法を教えてください。
- ベストアンサー
- オフィス系ソフト
- TeraTerm inputboxについて
マクロでinputboxを使用していますが、 値を入力しなくても次に進んでしまうため、 空の設定が入っていまいます。 文字列を入力しないと次に進めないような構成に したいのですが方法がわかりません。 どうかよろしくお願いします。
- 締切済み
- その他（プログラミング・開発）
- InputBoxをつかったフィルタ処理
1000kbほどのエクセルデータに対して、任意の文字列を含んだ行を抽出したいです。 ツールのフィルタの適用をしてもいいのですが、テキストボックスを出現させるだけで、かなりのラグ(5-6秒）があります。 そこでマクロを組んでさくさく作業を使用と思ったのですが、うまくいきません。解決法を提示して頂くと助かります。 以下、記述したものです。 ---------------------------------------------------------------- Sub フィルタ() Dim myR As String Dim Filter As String myR = Application.InputBox(prompt:="抽出語", Type:=2) ActiveSheet.Columns(1).AutoFilter Field:=1, Criteria1:="=*myR*" End Sub ----------------------------------------------------------------
- ベストアンサー
- オフィス系ソフト
- VBSでInputBoxを使いテキストの中身を編集
本家VBではなく、VBSなのですが、カテゴリがないので、ここに投稿させて頂きました。 ＜やりたいこと＞ 特定のパスにあるテキストファイルを開いて、 特定の文字列を探し、 InputBoxを表示し、変更したければそこに変更したい値を入力して[OK]。 （入力した値が参照した特定文字列と置換される） そのままで良ければ[キャンセル]。 を何カ所か行い終了。 ＜（特に）わからないこと＞ InputBoxを表示して、値を入力させた結果を置換させる 初心者（VBは未経験で、VBSも勉強を始めたばかりです）で何冊か本を調べたのですが分りませんでした。 Webで検索をかけてもvbsだとウィルスの情報ばかりで・・・。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- InputBox関数について教えて下さい。
InputBox関数について教えて下さい。 記述内容は以下の通りです。 Sub 追加() Dim tuika As Double tuika = Application.InputBox( _ Title:="追加", _ Prompt:="追加する項目を【全角大文字】で入力して下さい。", _ Left:=700, _ Top:=100, _ Type:=2) If tuika = False Then Exit Sub With Worksheets("Sheet1") .Range("B10").Value = tuika LastRow = Worksheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Row + 1 Worksheets("Sheet2").Range("A" & LastRow).Value = Worksheets("Sheet1").Range("B10").Value End With End Sub 困っているのは、Type:=2)の部分です。 文字列を指定しているのですが数値は入力出来るのですが肝心の文字列が入力出来ない状況です。 どなたかご指導をお願い致します。 【環境】 OS = WindowsXP SP3 Excel = 2003
- ベストアンサー
- その他MS Office製品
お礼
回答ありがとうございます！ いろんな用語を詳しく教えてくださいまして、 初心者の私にとったらうれしい限りです！ これからのよろしくおねがいします！