小弟乃是VB小白！特此声明，今天突发奇想要编一个小小的程序，就是定时关机的小程序，我在这个小程序里主要是用shell函数，但却遇到了麻烦！

Private Sub Command1_Click()
a = Text1.Text
Shell ("shutdown -s -t" & a)
End Sub
 高手看一下，为什么不能执行。