请问如何在VB中停止SQL服务器？

Question

让右下角的SQL图标变成红色方框，停掉它

Answer 1

Shell "net stop mssqlserver"

Answer 2

引用：SQL-DMOPrivate Sub Command1_Click()
    Dim MySQLServer As New SQLDMO.SQLServer
    MySQLServer.Stop '停止服务器
End Sub

Answer 3

我刚开始在程序中有这样的功能，后来发现
这样很不安全
真正在运行的系统，SqlServe通常是不停机的
如果停机了极有可能使管理人员在进行维护
这种情况下在客户端启动就很危险了