对VB6的快捷方式点击属性，设置“兼容性”选“Windows XP (Server Park 2)”即可。