ということで、改造に入りますー 表示するとこで、こんなことしてるんですが 'フィルター Dim query = From c In _chatsAll Where (c.thread = thread Or c.thread = -1) Select c Dim dummy As New List(Of UserListCnf) dummy.AddRange(query) _chats.Clea…