• 締切済み

コンボボックスにデータを反映させたい

VB6.0を使っています。 あらかじめメモ帳にデータをまとめて保存しておいて、そのファイルのデータをコンボボックスの選択肢に反映させたいのですがどうすればいいかわかりません。 宜しくお願いします。

みんなの回答

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.1

>どうすればいいかわかりません こんなことは、原理的には簡単なことではないか。 また質問が丸投げでは無いか。 ーー ●テキストファイルを読む ●コンボに反映する(AddItem) テキストファイルは改行で1レコードなので、1レコードを読めばコンボのアイテム1行ににAddItemすることになろう。 テキストファイルの中身の変更や削除や追加に連動することは難しい。従って、ある時点でのものになる。 ーー テキストファイルを読むコードなどWEBにたくさん転がっている。 もっとWEB利用の週間をつけるべきだ。 エクセルVBA(VB6.0にほぼ近い)でやってみると メモ帳で 東京 大阪 名古屋 神戸 熊本 をつくり、県名.txtで保存。 ーー Sub test01() Open "県名.txt" For Input As #1 While Not EOF(1) Line Input #1, a MsgBox a Worksheets("Sheet1").ComboBox1.AddItem a Wend Close #1 End Sub Worksheets("Sheet1").は、エクセルなればこそ必要なもので、 VBならフォームとかを指定。

関連するQ&A

  • データと直結したコンボボックスについて

    初めて質問します。 VB6とオラクルでの開発でコンボボックスを使います。 ユーザーの要望は、途中まで入力した内容に合うデータをコンボボックスのリストに表示して欲しいとのことなのですが、VBに入っている通常のコンボボックスで対応できるんでしょうか? また、出来なければ利用可能なツールなどがありましたら教えてください。

  • accessのコンボボックスを連動させた結果の反映

    access2002を使用しています。必要に駆られて勉強を始めましたが行き詰ってます。 初歩的な質問ですが宜しくお願いします。 AとBのコンボボックスでAで特定値を入れたときにその結果を再クエリでBの選択肢を絞り込むコンボボックスを作成しています。 http://oshiete1.goo.ne.jp/qa1413361.html の返答を参考にその通りの物を作ってみたのですが、(以下) 反映されたデータの入力テーブルの氏名入力にも、所属部が入力されてしまいます。Bのコンボボックスで選択した氏名を〔反映されたデータの入力〕テーブルの〔氏名入力〕に反映させたい場合はどのような変更を加えれば良いのでしょうか? ご指導頂ければ幸いです。

  • VBでコンボボックスとテキストボックスの連係

    VBでフォームにデータコンボボックスとテキストボックスを一つづつ作り、データコンボボックスで値を選択し、その値に対する値をテキストボックスに表示させたいんですがどうすればいいでしょうか? データコンボボックスで選択する元になるテーブルは ID | 商品 1 | みかん 2 | ばなな 3 | りんご と、上記のような形のテーブルをもちいています。 例えばデータコンボボックスで「1」を選択した場合テキストボックスに「みかん」と表示させたいです。

  • コンボボックスからテキストボックスへのデータ反映

    コンボボックスにてデータ(文字列+数字)を選択して、同フォーム内にある テキストボックスへ数字だけを表示させるにはどのようにコードを入力すれば良いでしょうか? VS2010を利用しています。 コンボボックスには、●●会社 00000000000 ▲▲会社 1111111111 といったように登録されております。 Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged TextBox1.Text = ComboBox1.Text End Sub 上記のコードですと、文字列+数字がテキストボックスへ反映されてしまいます。 お忙しい中お手数をお掛けしますが、ご教授下さい。

  • 追加したデータをコンボボックスへ即反映させたい。

    困っておりますので(私の勝手で申し訳ないですが)、アドバイスをお願いします。 【現状と状況のご説明】 収集した情報を活用する為にACCESSでデータを保存しております。登録した情報を絞込んで検索する為に、入力時に3つの定型項目をコンボボックスを使ったプルダウンメニューの形式で入力しています。 定型項目(3項目)への新たな項目追加は、個別(3つ)のテーブルを作成。そのテーブルからフォームを個別に3つ作成し、情報登録フォーム上にボタン(フォームを開くマクロ)を配して新たな項目を追加しています。 【簡単に構成をご説明】 ・テーブル名:情報登録テーブル(1つのテーブル) ・入力フォーム名:情報登録フォーム(3つのコンボボックス:A・B・C) ・テーブル名:情報項目テーブル(3つのテーブル) ・情報項目フォーム名:Aフォーム、Bフォーム、Cフォーム 【困っていること】 情報登録フォームから情報項目フォーム(A・B・C)を開いて、項目を追加したあと情報項目フォームを閉じても、開いている情報登録フォームのコンボボックスへ反映させられず(コンボボックスのメニューに未反映)、一度、情報登録フォームを終了させて、再度情報登録フォームを起動させるしかない状況です(そうすれば、コンボボックスのメニューに反映)。 【希望】 情報登録フォームを開いたままで、情報項目フォーム(A・B・C)に追加した項目をコンボボックスへ即反映させ、情報登録力フォームへの即入力を可能にさせたい。 以上ですが、宜しくお願いします。

  • コンボボックスに追加データを即反映させたい

    新たに食材管理データベースを作りましたが、スタート当初特有のデータ蓄積が薄いこともあり、二度手間三度手間と使いずらいくて困っています。 [困りごとの詳細] 食材管理フォーム「F_食材管理」にコンボボックスを利用して選択入力していますが、コンボボックスの選択リストに該当するデータがないときは、食材管理フォーム「F_食材管理」に配したコマンドボタンで、「F_食材メンテナンスフォーム」を開いてデータを追加しています。しかし、食材管理フォーム「F_食材管理」に即反映できません。反映させる為には、食材管理フォーム「F_食材管理」を一旦終了させる必要があります。尚、食材管理フォーム「F_食材管理」を終了させて再度開けば選択リストに反映されています。 [実施したこと] F_食材メンテナンスフォーム「F_食材管理販売店・F_食材管理食材名・F_食材管理容器姿」をそれぞれ「閉じる時」のイベントにマクロを設定し、アクションに「再クエリ」とし、引数にコンボボックス3個の名前「購入先・食材名・容器姿」をそれぞれに設定しました。しかし、全くもって効果がありませんでした。 [オブジェクトの紹介(関連オブジェクト)] ◆ACCESS2007 ◆入力フォーム F_食材管理:フォームビュー「入力フォーム」 ・1段「連結していません」コンボボックス×3個配置「購入先・食材名・容器姿」 ・フォームにF_食材メンテナンスフォームを開くコマンドボタン「メンテナンス」を配置しています。 ◆テーブル T_食材管理「メインテーブル」 T_食材管理売店名:コンボボックス参照データ T_食材管理食材名:コンボボックス参照データ T_食材管理容器姿:コンボボックス参照データ ◆メンテナンスフォーム F_食材メンテナンスフォーム「以下の3つのフォームを開くコマンドボタンを3個配置」 F_食材管理販売店(データシートビュー):参照先(コンボボックス名)=購入先 F_食材管理食材名(データシートビュー):参照先(コンボボックス名)=食材名 F_食材管理容器姿(データシートビュー):参照先(コンボボックス名)=容器姿 [データベース作成の背景] 食材の特売品「イレギュラー特価・消費期限が比較的短いなど・・・他」を購入(無計画傾向になりやすい)するが、消費期限管理「冷蔵庫内の隅々チェックが面倒」ができていなかったので、廃棄するなどのロスが発生「ゼロにしたい」していた。また、日常的にデータベースの一覧を閲覧「献立を考える」する機会を持てることで、ACCESSデータベースに触れる機会を増やせるのではと考えました。 データベースは購入したものを順次追加していき、消費「チェックボックス」したもや廃棄「チェックボックス」したものにチェック「修正一覧フォームを使って」を入れる様にしています。また、クエリを使って「在庫食材・消費食材・廃棄情報」を一覧フォームで確認できる仕組みです。データが貯まれば傾向「消費期限と消費の関係や消費食材の傾向など・・」を確認できたらと考えています。まだまだ、おおざっぱで雑でもありますが、とりあえず無いよりましとスタートしました。 以上ですが、宜しくお願いします。

  • VB.NET)ボックスからラベルにデータを反映させたい

    先日コンボボックス連動についての質問をしたものです 今回も金曜夕方完成まででどうしても分からない部分がありお知恵をお借りしたく質問させていただきます(聞ける方はいるのですがどうしても直接見てもらえる状況でなく口頭になってしまうので上手く聞けず説明できず理解できずの状態です) 前回同様条件は、VB.NET(言語:VB)でAccessは利用なら最低限 Access中心の開発やマクロ、Excel等は使用しないということでお願いします private sub form4_load(bybal~)handle form4_load dim strdata() as string = {"年会費","月会費"} listbox2.items.addrange(strdata) listbox3.items.addrange(strdata) select case form2.combobox1.text case "東北" label9.text = "東北"(関東とコンボボックス1で出たら関東がラベルに表示できるようしたいのです) end select 上記はリストボックスに格納するために記載、listbox2と3は1と4にそれぞれボタンクリックがあればデータを写す作業をします 問題は下で、Form4にLabel9があるのですが別のForm2のコンボボックス で選ばれたデータをLavel9に反映させたいのです 同様Form2のコンボボックス2(1で選ばれたものの中でさらに選択するという設定になっています)で選ばれたデータをLavel10に反映させたいのですが上手くいきません ここはこうしたほうがいい、こう書いたらどうか?みたいなのがありましたらよろしくお願いいたします VBはあまり経験が無く分からないことばかりなので、分かりやすくお願いできますでしょうか?

  • コンボボックスでのイベントについて

    VB6です。 コンボボックスに予めいくつかのデータを設定済みで、 その設定されているデータをリストから選択した時のイベントはどのようなイベントでしょうか。 試してみましたが、Changeイベントではなさそうです。 このイベントがぜひとも必要なのです。

  • コンボボックスの値が画面移動後、保存されません。

    まだ、VB初めて2ヶ月なので分かる方、申し訳ないのですが 分かりやすく教えて下さい。 メニュー画面とデータを記入する画面が2画面あります。 メニュー画面の方に、コンボボックスを設置し、 コンボボックスに記入又は、記入したデータを選択させたい のですが、コンボボックスにデータを保存できません。 最初は空の状態で初めて、コンボボックスに名称を入れます。 保存するデータ入れて、コマンドボタンを押します。 この時コンボボックスの▼を押したら、値は残っていました。 そして、データ記入画面に移ります。 又、メニュー画面に戻ると、その名前は保存されてなく 綺麗さっぱり無くなってしまいます。 本には、大雑把に書いてあるだけでした。 本に書いてあった事は、コンボボックスに値を保存する時、 コマンドボタンに (コンボボックスのオブジェクト名:cboName) cboName.AddItem cboName.Text としか載ってなく、後の事は何も書いてありませんでした。 私には、後どのようにすれば良いのかが分かりません。 どうぞ、よろしくお願い致します。

  • ACCESSのコンボボックスデータについて

    Microsoft Office Accessのフォームに作成したコンボボックスで選択できるデータは一つしかダメなんでしょうか? コンボボックスには3項目のデータがあり2番目及び3番目のデータもクエリーの抽出条件として使いたいのですが可能でしょうか? 良い方法があれば教えて頂けないでしょうか。

専門家に質問してみよう