如何产生一个对象的副本？

Set itmX = .SelectedItem.Tag，是给对象赋值。给对象赋值就是把它要引用的对象的指针传给它。
如果.SelectedItem.Tag不是对象，就象你上边的代码，把SET去掉就可以了。
如果.SelectedItem.Tag是对象，我认为没有必要建立一个副本。你上面的代码显示TAG内容为字符串，可以不用set赋值。