I use the following code to open a DOS box. I thought the "/k" option would keep it open but it doesn't.
B4X:
Dim lijst As List
lijst.Initialize
lijst.Add("/k")
Shll.Initialize ("shll","c:\windows\system32\cmd.exe",lijst)
Shll.Run(-1)