vb Private Sub Command1-Click()

显然不是你自己的代码!查了 MSDN,shell 的 第二个参数Shell 常数可在代码中的任何地方使用下列常数代替实际值：常数 值 描述 vbHide 0 窗口是隐藏的,并且焦点被传递给隐藏窗口。vbNormalFocus 1 窗口拥有焦点,并且恢复到原来的大小与位置。vbMinimizedFocus 2 窗口缩小为图符并拥有焦点。vbMaximizedFocus 3 窗口最大化并拥有焦点。vbNormalNoFocus 4 窗口被恢复到最近一次的大小与位置。当前活动窗口仍为活动窗口。vbMinimizeNoFocus 6 窗口缩小为图符。当前活动窗口仍为活动窗口。