任务栏不是平铺在下方，而是重叠在一起，有上下箭头，那样很麻烦，如何调整？

在任务栏上右键点击 属性－－分组相似任务栏按钮－取消前面的勾－－确定。

右键点开始》》选属性》》上面选任务栏》》第2个勾取消，（自动隐藏了） ，最后确定

Set WSHShell = WScript.CreateObject("WScript.Shell")
Message = "本脚本用于修复Windows XP中当最小化程序时，任务栏显示图标的问题。"& vbCR & vbCR
Message = Message & "为了正常工作，本脚本将关闭和重启 Windows Explorer 外壳，这个操作不会损坏你的系统。" & vbCR & vbCR
Message = Message & "请关闭所有杀毒软件的实时监控！并保存所有打开的文件。"& vbCR & vbCR
Message = Message & "是否继续？"

X = MsgBox(Message, vbYesNo+vbExclamation, "注意")

If X = 6 Then

On Error Resume Next

WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2\"
WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\StreamsMRU\"
WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Streams\Desktop\&q