7,763
社区成员
发帖
与我相关
我的任务
分享
Public Type netBaseParamStructure
bytIP(0 To 1, 0 To 3) As Byte '0 To 1:A网口和B网口,0 To 3:每个IP地址占用共4个字节
bytMask(0 To 1, 0 To 3) As Byte '地址掩码
bytGateWay(0 To 1, 0 To 3) As Byte '网关信息
End Type
Public NetBaseParam As netBaseParamStructure
Fileno = FreeFile
Open filename For Binary As #Fileno
Get #Fileno, , NetBaseParam
Close #Fileno
NetBaseParam.bytIP(0, 0) = 192 'A网口
NetBaseParam.bytIP(0, 1) = 168
NetBaseParam.bytIP(0, 2) =0
NetBaseParam.bytIP(0, 3) = 2
NetBaseParam.bytIP(1, 0) = 192 ‘B网口
NetBaseParam.bytIP(1, 1) =168
NetBaseParam.bytIP(1, 2) = 0
NetBaseParam.bytIP(1, 3) =3
..............
Fileno = FreeFile
Open filename For Binary As #Fileno
Put #Fileno, , NetBaseParam
Close #Fileno
为什么存到.dat文件里面的顺序是192 192 168 168 0 0 2 3????
Public Type netBaseParamStructure
bytIP(0 To 3, 0 To 1) As Byte '0 To 3:每个IP地址占用共4个字节,0 To 1:A网口和B网口
bytMask(0 To 3, 0 To 1) As Byte '地址掩码
bytGateWay(0 To 3, 0 To 1) As Byte '网关信息
End Type