问按一下按钮输入cmd命令

EN

我有点像个vba内核，我正在尝试使用下面的代码启动基于这段视频 (用于visual-studio-2008)的按钮单击火狐。

Private Sub Button1_Click() Handles Button1.Click
    Shell("CMD.exe")
    SendKeys.Send("start firefox")
    SendKeys.Send("{ENTER}")
    Close()
End Sub

然而，所有这些都是启动cmd，它没有在其中输入任何内容(当我在cmd中输入start firefox时，它工作了)，我做错了什么？

注意:我使用的是visual-studio-2012 (如果有关系的话)，而且我以前从未在visual程序中使用过cmd。