掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
CallByNameを使ってListBoxに順次、入力したいのですがエラーばっかりでうまくいきません (ID:147016)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
VisualBasic6の掲示板で次の質問をした者です。 Dim LBX() AS Object={ListBox1,ListBox2,ListBox3,ListBox4,ListBox5} For i = 0 To 4 CallByName(LBX(i),"Items",CallType.Method,CStr(i)) Next 上記でエラーの続出でしたが (1) ListBox の [Items プロパティ]から、 ListBox.ObjectCollection クラスを得る。 (2) 1 で得たオブジェクトの [Add メソッド]にて 新しいデータを登録する。 のヒントを戴いてようやくエラーがなく目的の処理ができました。 Dim OBj As Object For m = 0 To 4 OBj = CallByName(LBX(m), "ITems", CallType.Get) CallByName(FC, "Add", CallType.Method, CStr(m)) Next これで １２個のListBoxに(式では５個)データベースの１４行１２列を 表示できることになりました。 魔界の仮面弁士様 有難うございました。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.