有关在VB中调用ReadFile的问题

[louyq]

我在VB中通过CreateProcess来执行调用.NET的vbc.exe编译程序，然后想通过ReadFile来获取编译的结果信息。但是每当我调用后者时，程序就会连同我的vb程序一起关掉，请大家帮帮忙！
谢谢！

我的程序是：
sa.nLength = Len(sa)
sa.bInheritHandle = True

ret = CreatePipe(hReadPipe, hWritePipe, sa, 0)

start.cb = Len(start)
start.dwFlags = STARTF_USESTDHANDLES Or STARTF_USESHOWWINDOW start.hStdOutput = hWritePipe
start.hStdError = hWritePipe
start.wShowWindow = SW_HIDE

ret = CreateProcess(vbNullString, sCmdline, sa, sa, True,
NORMAL_PRIORITY_CLASS, 0&, vbNullString, start, proc)

sBuffer = String(256, Chr$(0))
Do
ret = ReadFile(hReadPipe, sBuffer, 256, lngBytesRead, ByVal 0&)
sOutput = sOutput & Left$(sBuffer, lngBytesRead)
Loop While ret <> 0