• ベストアンサー

コンボボックスの初期表示について

コンボボックスの初期表示についてですが、 試験できる環境がないため、以下の認識で正しいか教えてください。 コンボボックス1行目を表示 ComboBox1.SelectedIndex = 0 コンボボックス2行目を表示 ComboBox1.SelectedIndex = 1 空白を表示 ComboBox1.SelectedIndex = null or "" 文字を表示 ComboBox1.SelectedIndex = "表示"

  • craftx
  • お礼率48% (388/806)

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

1行目、2行目表示は合っています。 空白を表示 = 未選択状態とするなら、 ComboBox1.SelectedIndex = -1 文字を表示するのは ComboBox1.Text = "表示" となります。

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • DataGridViewのコンボボックスの初期値について

    VB2005です。 DataGridViewでコンボボックスを作成してあります。 コンボボックスのDataSourceを指定した場合、 コンボボックスにカーソルが移ったときに、 1行目はDataSourceで指定したデータの1行目の値 （2行目以降は前の行で選択した値）が表示されが表示されてしまいます。 その値を利用したい場合、再度コンボボックスで選択しなおさないと 有効になりません。それならば、カーソルが移ったときも空白のままでは いられないのでしょうか？ コンボボックスのDataSourceを指定しないで、 Itemsに値を設定したときには、カーソルが移ったときも値が 表示されないで空白のままです。このような設定にしたいのですが。 DataSourceをしてしたときには無理なのでしょうか？ よろしくお願いいたします。

  • コンボボックスの初期値（？）

    アクセス２０００でデータベースを作成しています。 フォームでコンボボックスを置いています。フォームはなにも打たないと空白になっています。大体、いつも同じものを選択することになるのでそれを初期値としてセットしておきたいと思っています。コンボボックスのプロパティに「既定値」がありそれに入力しておく方法があります。 これではひとつ問題があります。リスト行が何行もある場合、一番上から選択しなければいけません。これをリスト行の真ん中あたりから上下選べるようにしたいのです。 このような場合、どのような方法でやればいいでしょうか？

  • ＶＢ２００８でコンボボックスのクリアについて

    ＶＢ２００８でコンボボックスのクリアについて お世話になります。 コンボの設定を With ComboBox1 .Items.Clear() .Items.Add("a") .Items.Add("b") .SelectedIndex = 0 End With のようにしていた場合 ComboBox1.Items.Clear()を実行しても "a"の値がコンボに残るみたいなのですが、 指定の方法が悪いのでしょうか？ .SelectedIndex = 0を指定しないと クリアされるみたいなのですが。 よろしくお願いいたします。

  • VBAのコンボボックスのカラムについて

    以下のようにしてコンボボックスのカラムにも文字列が入るようにしております。 With ComboBox1 .AddItem "hogehoge" ComboBox1.List(0, 1) = "aiueo" End With これによってコンボボックスをクリックして出てくるリストにはhogehogeとaiueoの両方が 出てきますが、これを選択するとhogehogeだけがコンボボックスに残され、 (0,1)にあった文字列は消えてしまいます。 リストから選択した後もコンボボックス内にカラムの文字を残すにはどのようにすればよろしいでしょうか？（できれば区切りありで） よろしくお願いします。

  • コンボボックスのリスト内容表示の仕方

    エクセル マクロ VBA の質問です。ユーザーフォーム（UserForm1)にあるコンボボックス(ComboBox1)にリストを表示したいのですが。 全部という項目と（これはできてます） エクセルのシートA4からA列の空白行までの値を項目として表示したいのですが、いまいちうまくいきません。 教えていただけると助かります。

  • ExcelVBAでコンボボックスに初期値設定

    ExcelVBAでユーザーフォームを作成しています。 表示したときにコンボボックスに「選択して下さい」と表示させる方法を教えて下さい。 コンボボックスで「2003年_H15」～「2012年_H24」が選択できて、選択するとラベルに「2002～2004年」のように表示されます。 【コンボボックス：選択】2003年_H15 【ラベル：表示】2002～2004年 コンボボックスの値はSheetから設定しています。 ユーザーフォームを表示させたときにコンボボックスに「選択して下さい」と初期値として設定するにはどうしたらよいか教えて下さい。 Sheetに追加するとかんたんなのですが、ラベルに表示させるために、以下のようなコードを書いていたりするので、うまく動きません。 Private Sub ComboBox_Change() Dim sh As Worksheet Set sh = Worksheets("Sheet1") With ComboBox If .ListIndex >= 0 Then Label.Caption = Left(sh.Cells(.ListIndex + 1, 1), 4) _ & "～" & Left(sh.Cells(.ListIndex + 3, 1), 4) & "年" End If End With End Sub よろしくお願い致します。

  • ExcelVBAコンボボックスの値の入力

    ExcelVBAでマルチページでユーザーフォームを作っています。 マルチページを作製しているシートのシート2とシート3にそれぞれコンボボックスに当てはめる値を入れてあります。 コンボボックス1には「シート2のA2から最後」まで。 コンボボックス2には「シート3のA1から最後」まで。 というように設定してあります。 コードの記述としてはこんな感じでしました。 Private Sub ComboBox1_DropButtonClick() Dim i As Integer Dim lastRow As Integer lastRow = Cells(Row.Count, 1).End(xlUp).Row With ComboBox1 For i = 2 To lastRow If ComboBox1 = "" Then .AddItem Worksheets("Sheet2").Cells(i, 1).Value End If Next i End With End Sub これはコンボボックス1の場合なのですが、2は一部を変えています。 コンボボックスを選択時にシートに記載してある内容は表示されるのですが、行が多い方に引っ張られる感じになっています。 コンボボックス1の方は今のところ30行ちょっとなので、その分のデータが表示されます。コンボボックス2の方は今のところ10行程度なので、全てを表示した後に空白が表示されています。見た感じで、シート3のデータと空白分を合わせて、シート2つまりは、コンボボックス1と同じ分だけ表示しようとしているみたいなのです。 よく分からないエラーなのですが、これを回避する方法はありますでしょうか？

  • access コンボボックス初期表示について

    ＡＣＣＥＳＳ　ＶＢＡ　コンボボックス　初期表示について。質問します。m(__)m 教えてください。　VBAのフォームロードでコンボボックスに初期表示 させたいのですが、初期表示させいたい内容というのが、テーブルにある例えば列名ＡＡＡ、列名ＢＢＢがあるとして 　列名ＡＡＡの中で「３」を持っている、列名ＢＢＢの名前を初期表示させたいのです。 テーブル名　ＣＣＣ ＡＡＡ...BＢＢ. ...1 ......あ.... ...2.......い.... ...3.......う.... ...4 ......え... このテーブル「ＣＣＣ」でいえば３を指定して、「う」をフォームロードでコンボボックスに初期表示させたいのですがどうやればいいのでしょうか？ いまの状態はコンボボックスに「あ・い・う・え」の順番で取っきていて「あ」が初期表示になっています。 コードの書き方がわかりません。教えてください テーブルＣＣＣはフォームのプロパティのコントロールソースでつなげてあります。 ↑という風に質問させていただいて 回答していただいた内容は //何番目のデータを初期表示したいか決め、ＦＯＲＭ　ＬＯＡＤ時にその値をLISTINDEXにセットすれば良いのでは？ //即ち //Private Sub Form_Load() //Combo1.ListIndex = 2 //End Sub //のようにプログラムを書けば良いと思います。但し、初期値は”０”なので注意が必要です。 としていただいたのですが、私の質問が説明が足りていなくて改めて質問させていただきます。 テーブルの中身はそのときそのときで入れ替わります。 テーブル名　ＣＣＣ　 ＡＡＡ...BＢＢ..........................................ＡＡＡ..ＢＢＢ ...1 ......あ....左の並びのときもあれば.......3.......か ...2.......い....右のように並びが変わる.......1.......け　 ...3.......う......時があります。....................2.......さ ...4 ......え................................................4.......な このときに「３」を指定して、３に対応するＢＢＢの行をフォームロードでコンボボックスに初期表示させたいのですがどうやればいいのでしょうか？

  • コンボボックスのSelectedIndex

    お世話になっております VB.NET 2010 Windows7 Windowsフォーム画面の開発をしています コンボボックスについて質問です コンボボックスに値を追加するときに、 ComboBox.Add("あいうえお") だと、Valueが設定されません なので ComboBox.DataSource = dtcpyCombo.Copy 'dtcpyCombo は、コンボボックス用DataTable ComboBox.ValueMember = dtCombo.Columns(0).ColumnName '0番目はKEY ComboBox.DisplayMember = dtCombo.Columns(2).ColumnName '2番目はKEY & "：" & VALUE dtcpyCombo.Dispose() としたのですが、ValueMemberを設定する部分で、SelectedIndexイベントが動いてしまいます 今回のコンボボックスは特殊操作をするので、特殊動作を入れています (http://blog.goo.ne.jp/jjskapibara/e/94a967a61d39f5e03521dfe839418e62) もともとの仕様なのか、上記操作を入れたために起きているのかがわかりません 教えていただけると嬉しいです

  • IEのコンボボックスが空になってしまう

    ＩＥでコンボボックスを表示させているのですが、何故か初期表示が空白になってしまいます。よーくＩＥを見たところ、一旦小さいサイズでコンボボックスが表示されて、それから大きく表示し直したときに、空白になるようです。どなたか、この現象の原因か回避策を教えてください。 よろしくお願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する