テキストファイルをコンボボックスに表示するには？ (ID:111263)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 イメージとしては、こんな感じになるかと。 必要に応じて、エラーチェック処理や変数宣言等を追加してみてください。 FNo = FreeFile() Open ファイル名 For Input As #FNo Do Until EOF(FNo) Input #FNo, strA, strB, strC Combo1.AddItem strA Combo2.AddItem strB Combo3.AddItem strC Loop Close #FNo