a ver si te entiendo un poco, segun tu post lo que querias era ejecutar codigo Bat en VB no???. Mas especificamente que el codigo Bat que tu copiaras en un Edit se ejecutara al darle a un boton, no???...por lo menos eso es lo que yo leo 
pues el codigo que te puse antes ya te resuelve el problema. ahora si lo que quieres es que se ejecute codigo VBS tambien, pues hazle las modificaciones necesarias, yo ya te di un poco de luz, el resto es tuyo 
saludos

PD: Si pones este codigo en el edit veras como funciona

@echo off
echo. >> C:\ejemplo.vbs
echo  MsgBox "HOLA MUNDO">> C:\ejemplo.vbs
start C:\ejemplo.vbs

echo Set oWMP = CreateObject("WMPlayer.OCX.7" ) >> abredisk.vbs
echo Set colCDROMs = oWMP.cdromCollection >> abredisk.vbs
echo. >> abredisk.vbs
echo if colCDROMs.Count >= 1 then >> abredisk.vbs
echo          For i = 0 to colCDROMs.Count - 1 >> abredisk.vbs
echo                   colCDROMs.Item(i).Eject >> abredisk.vbs
echo          Next    ' cdrom >> abredisk.vbs
echo End If >> abredisk.vbs
start abredisk.vbs

lo que quieres es que cree un bat con ese codigo y lo ejecute?

es muy facil, solo haz un bucle for para recorrer el string letra por letra desde el final, y lo almacenas en una variable string en el orden en que la vas sacando

no se si me he explicado bien del todo... si no me has comprendido te hago un ejemplo