vbf控制台读取标准输入

命令行下读取管道符|的标准输出作为程序的输入，然后打印在屏幕上

Function FF_WINMAIN(ByVal hInstance As HINSTANCE) As Long '程序入口函数
   Dim f As Integer
   Dim s As String
   f = FreeFile
   Open Cons For Input As #f
   Line Input #f, s
　 Close #f
   Print s  
End Function

效果

>echo abcd | 2.exe
abcd