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

投稿日: 2006/07/19(Wed) 12:36
投稿者るしぇ
Eメール
URL
タイトルRe^5: listboxの項目番号を取得

人間が現実世界でできないことはプログラムでも無理だよ。

>今やりたいことは、ListBoxに重複したIDがありまして
>その指定の行のデータを取得したいのですが、
では、

  たとえばID番号が ID1(1行目),ID1(2行目),ID1(3行目)と
あるとします。ボクが選びたいのは"ID1"の行です。
ボクが選びたいのは何行目の"ID1"ですか?
…この質問に答えられないと実現できないのでは?

 そもそも同じ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 -