VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日： 2006/07/20(Thu) 16:59
投稿者： お茶
Ｅメール：
ＵＲＬ：
タイトル： Re^6: listboxの項目番号を取得

ご返事おくれましてすみません。
みなさんいろいろとありがとうございました。

vb6.0を使用してItemDataを使用しできました。
本当にありがとうございました。

> 人間が現実世界でできないことはプログラムでも無理だよ。
>
> >今やりたいことは、ListBoxに重複したIDがありまして
> >その指定の行のデータを取得したいのですが、
> では、
>
>   たとえばID番号が　ID１(1行目），ID１(2行目），ID１（３行目）と
> あるとします。ボクが選びたいのは"ID１"の行です。
> ボクが選びたいのは何行目の"ID１"ですか？
> …この質問に答えられないと実現できないのでは？
>
> 　そもそも同じIDで何かを区別しようというのが間違ってて、
> (というか同じだと言っているものを区別って矛盾してます)
> IDなんか関係なくて、行数で区別すればいいだけでは？。
> 　リスト上に無い情報を表示したいなら、配列でもなんでも
> 別に用意しておいて、そちらに情報を入れておけばいい
> でしょ？
>
> [VB6.0]まぁ、↓だけだったら ItemData 使えばいいんですが。
> Private m_LabelList() As String
>
> Private Sub Form_Load()
>     Dim i As Integer
>     With Me.List1
>         .AddItem "あああ,ID1"
>         .AddItem "てすと,ID1"
>         .AddItem "おおお,ID1"
>         ReDim m_LabelList(.ListCount - 1)
>         For i = 0 To .ListCount - 1
>             m_LabelList(i) = "らべる" & CStr(i)
>         Next
>     End With
> End Sub
>
> Private Sub List1_Click()
>     Me.Label1.Caption = m_LabelList(Me.List1.ListIndex)
> End Sub

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- VBレスキュー(花ちゃん) - - Web Forum -