Public Sub KillAllProcesses ( _
    databaseName As String _
)

Dim instance As Server
Dim databaseName As String

instance.KillAllProcesses(databaseName)

public void KillAllProcesses(
    string databaseName
)

public:
void KillAllProcesses(
    String^ databaseName
)

member KillAllProcesses : 
        databaseName:string -> unit 

public function KillAllProcesses(
    databaseName : String
)

'Connect to the local, default instance of SQL Server.
Dim srv As Server
srv = New Server
'Stop all processes running on the AdventureWorks2012 database.
srv.KillAllProcesses("AdventureWorks2012")
'Stop the AventureWorks database.
srv.KillDatabase("AdventureWorks2012")
'Stop the specified process with ID 52.
srv.KillProcess(52)

$srv = new-object Microsoft.SqlServer.Management.Smo.Server("(local)")
$srv.KillAllProcesses("AdventureWorks2012")
$srv.KillDatabase("AdventureWorks2012")
$srv.KillProcess(52)