打开“记事本”的展开问题

hgxly

我用下面语句打开“笔记本”，出现一个问题，就是这个记事本并不展开在桌面上，而是缩小成图标在底下。有办法让它展开吗？
Private Sub Command0_Click()
  xll = "NOTEPAD.EXE "
  Shell xll
End Sub

hgxly

我找到了解决方法，加个vbNormalFocus。
如下：
Shell "NotePad.EXE d:\猫.txt", vbNormalFocus
Shell "NotePad.EXE ", vbNormalFocus