关于VB语言的语句?

来源:百度知道 编辑:UC知道 时间:2024/05/15 02:23:24
private Sub Form_Load()
Dim fieno As Integer
fieno=FreeFile()
open App.path&"\net,conf"For lnput As #fileNo
line:lnput#flleno,myport
Cose #fileNo
winsockserver.Localport=
winsockserver.Listen
End Sub
请问这段码意思是什么?其中fieno=FreeFile()
open App.path&"\net,conf"For lnput As #fileNo
line:lnput#flleno,myport
Cose #fileNo是什么语句或什么意思?

fieno=FreeFile() 分配一个文件号
open App.path&"\net,conf"For lnput As #fileNo
读取程序目录下的net.conf文件
line:lnput#flleno,myport 读文件中的一行
Cose #fileNo 关闭文件

这段代码的总体意思是读取文件的数据来作为为程序参数
但代码有多处错误