Question

关于一段VB6程序代码的 详细含义

Dim b() As Byte
Dim file As Long

b = LoadResData(102, "CUSTOM")
file = FreeFile

Open "c:\birthday.jpg" For Binary As #file
On Error Resume Next
Put #1, , b
Close #file

几乎每行代码的意思都不懂，请解释：

1，b()是变量吗？后面为什么要加个（）
2，b = LoadResData(102, "CUSTOM")什么意思，loadresdata是函数名吗？
3，file = FreeFile又是什么意思
4，Open "c:\birthday.jpg" For Binary As #file中#file代表什么？？
5，On Error Resume Next
Put #1, , b
Close #file又是什么意思？Put #1, , b是put语句吗？？格式是什么？？为什么加个#号
还有这段代码能实现什么具体功能？？
请问大师解释详细一点，越详细越好！！谢了！！！

Answer 1

1，b是变量，不过在这里它是数组变量。后面加个（）说明b是动态数组，即b引用的数组其维数和大小在运行时是可以改变的。
2，LoadResData是VB中内置的一个用于读取资源数据的函数。在这里表示要读取资源文件中标识符为102的光标数据。并把读取到的光标数据保存到b表示的数组中。
3，由于VB中用于读写文件的许多函数都需要用一个文件号来代表要操作的文件，这个文件号可以由自己自由选择，但为了确保使用的文件号没被其它的程序代码占用，所以可以由FreeFile函数返回一个肯定能使用的文件号，这个返回的文件号用file变量保存。
4，按二进制方式打开c:\birthday.jpg文件用于操作。注意，如果该文件不存在，系统将自动建立该文件。在这里#file的意思正是说明将第3行代码保存在file变量中的文件号用于代表文件c:\birthday.jpg
5，在这里的语句On Error Resume Next 表示忽略所有的代码错误，即如果某条代码发生错误，自动继续执行下一条代码。
Put #1, , b 的意思是将保存在数组b中的光标数据写入到文件中。不过这里应该将#1更改为file。不知道你这个#1文件号代表的是哪个文件。
最后那句Close #file表示文件已操作完毕，让系统释放有关文件处理时占用的资源。

整个代码的意思是，从程序的资源文件中读取标识符为102的光标数据，另保存到c:\birthday.jpg中。不过代码中有些地方还需改动一下。

Answer 2

1。是变量。 因为那是字节数组
2。是函数名 从程序的资源里读取数据 CUSTOM代表着数据格式
3。不太清楚 按照英文理解 FREEFILE 就是空文件 那么也就是 file定义为一个空的文件
4。#file 就是文件号 打开了c:\birthday.jpg 而文件号就是打开字节的代号
5。错误调试 如果错误了就 写 出#1 这个文件号代表的路径 写出的字节为前面所定义的变量b
最后一局 close #file 是因为 前面有open 也就是打开了文件#file 后面必须关闭 否则会有不可预料的错误