ShiftOS-TheRevival/TerminalApplications/Internal/Com_Taskkill.vb


1
2
3
4
5
6
7
8
9
10

Module Com_Taskkill
    Public Sub Taskkill()
        Dim PID As Integer = command.Substring(9)
        If PID = 0 Then
            NewLine("You cannot kill Terminal in this Window Manager")
        Else
            Strings.ProcessID(PID) = 0
        End If
    End Sub
End Module