vb.net判断多个listbox

图片说明
如题：并将符合条件的选项并将结果显示在另外一个列表

 Dim query = listbox1.Items.Cast<string>().Union(listbox3.Items.Cast<string>())
    .Union(listbox4.Items.Cast<string>())
        .Union(listbox5.Items.Cast<string>()).ToArray()
listbox2.Items.AddRange(query)