vb6 - Get 在 VB6 中做什么？

Question

我正在尝试修改某人在 sem 遥远的过去用 VB6 编写的程序，并且遇到了下面的行以及许多类似的行。我的问题是，从语法上讲，这个“Get”行看起来像它或可能做什么？

  Get #3, StartByte + Offset, StudentScrBytes

在程序中，它后面总是跟有 3 个逗号分隔的项目，除了一个异常(exception)，第一个项目是前面带有 # 的数字。第二个看起来总是解析为数字，第三个看起来总是解析为单个变量。

我相当确定我已经弄清楚 # 前面的数字是文件引用 - 第一次 Get 出现时，它不是 #3 或 #10 或 #whatever，而是有一个已初始化的变量“TempFile”如FreeFile().

  TempFile = FreeFile()
  Open "c:\folerName.dir" For Binary Shared As TempFile

我在 VB6 中的 Get 上找到的唯一内容似乎与 OOP 和 getter/setter 相关。也许我错了，但我真的不认为这就是这里发生的事情，我所拥有的只是模糊的猜测。

这是该行所取自的函数。两个参数都是整数。

Function StudentScr$(Record, Contest)

  Dim StudentScrBytes As String * 4
  StartByte = (Record - 1) * LengthOfStudentRecord
  If Contest = 1 Then Offset = 77
  If Contest = 2 Then Offset = 85
  If Contest = 3 Then Offset = 94
  If Contest = 4 Then Offset = 102
  If Contest = 5 Then Offset = 110
  If Contest = 6 Then Offset = 118
  If Contest = 7 Then Offset = 126
  If Contest = 8 Then Offset = 134
  Get #3, StartByte + Offset, StudentScrBytes
  StudentScr$ = StudentScrBytes

End Function

我认为 Get 会从指定的文件中获取某些内容，但我根本无法判断如何(或是否)指定文件。

Answer 1

查看原始 MS VB6 文档:

https://msdn.microsoft.com/en-us/library/aa243376(v=vs.60).aspx

您可能也对其对应的 Put 感兴趣:

https://msdn.microsoft.com/en-us/library/aa266212(v=vs.60).aspx

提示:搜索旧版 VB 语句时，请在 Google 搜索中包含 Visual Studio 6.0 的“vs.60”，并将搜索限制在 MS 站点。 MS在官方链接中有这个术语，所以你不能错过它。本次搜索:

vb6 vs.60 获取站点:microsoft.com

确实在我的机器上显示了 Get 和 Put 作为两个第一个 Google 答案。