|
▼Jaka さん:
アドバイスありがとうございます
やっぱり、地道にアイテム行を検索しつつ反映させる方法でいこうと
思っています
いろいろと教えていただいてありがとうございました
助かりました
>▼まい さん:
>>一つききたいのですが、
>>リストに反映させる場合は、やはり、一から対称アイテムの行を検索して、
>>値を入力させるといった形になるのでしょうか?
>>そういうやり方しかないのでしょうか?
>>毎回、チェックしたアイテムを一つ一つ探しにいって、値を代入させるのは、時間もかかりそうで・・・
>
>その方がいいですよ。
>たいした時間でもないと思うし。
>
>無理やりなら、配列に入れておくとか。
>ただ、これだと配列のクリアのタイミングとか、チェックを外した時とか、
>色々考えないとならないから、私ならやりません。
>あ、都度配列を拡張しないで、あらかじめリストアイテム分の配列を作っておけば、
>配列のインデックスとリストインデックスが一致するから?(+1が必要かも)
>それなりに出来るでしょうが、やっぱりやりません。
>
>Dim ItemTb() As Long, Tbub As Long
>
>Private Sub ListView1_ItemCheck(ByVal Item As MSComctlLib.ListItem)
>On Error Resume Next
>Tbub = UBound(ItemTb)
>If Err Then
> Tbub = 1
>End If
>ReDim Preserve ItemTb(1 To Tbub)
>ItemTb(Tbub) = Item.Index
>'MsgBox Item.Index
>End Sub
|
|