vbf实现读取标准输出类似于python os.popen功能

顾名思义，执行一个shell命令，并将其输出读入到程序中

Function FF_WINMAIN(ByVal hInstance As HINSTANCE) As Long '程序入口函数
   Dim f As Integer
   Dim s As String
   f = FreeFile
   Open Pipe "ipconfig" For Input As #f
   Do While Not EOF(f)
      Line Input #f ,s
      Print s
   Loop   
   Close #f
End Function

 效果

....\Projects\2\release>2.exe

Windows IP 配置


以太网适配器 以太网:

   连接特定的 DNS 后缀 . . . . . . . : crospace.cn
   本地链接 IPv6 地址. . . . . . . . : fe80::6472:c2ad:8f29:ca7e%10
   IPv4 地址 . . . . . . . . . . . . : 192.168.200.17
   子网掩码  . . . . . . . . . . . . : 255.255.255.0
   默认网关. . . . . . . . . . . . . : 192.168.200.1

以太网适配器 VMware Network Adapter VMnet1:

   连接特定的 DNS 后缀 . . . . . . . :
   本地链接 IPv6 地址. . . . . . . . : fe80::e96b:5c08:eca6:3ce1%14
   IPv4 地址 . . . . . . . . . . . . : 192.168.40.1
   子网掩码  . . . . . . . . . . . . : 255.255.255.0
   默认网关. . . . . . . . . . . . . :

以太网适配器 VMware Network Adapter VMnet8:

   连接特定的 DNS 后缀 . . . . . . . :
   本地链接 IPv6 地址. . . . . . . . : fe80::b1e0:ead1:9620:a663%9
   IPv4 地址 . . . . . . . . . . . . : 192.168.43.1
   子网掩码  . . . . . . . . . . . . : 255.255.255.0
   默认网关. . . . . . . . . . . . . :

以太网适配器 vEthernet (以太网):

   连接特定的 DNS 后缀 . . . . . . . :
   本地链接 IPv6 地址. . . . . . . . : fe80::e583:add8:6273:e5e0%27
   IPv4 地址 . . . . . . . . . . . . : 172.26.208.1
   子网掩码  . . . . . . . . . . . . : 255.255.240.0
   默认网关. . . . . . . . . . . . . :