Я пытаюсь изменить программу, которую кто-то написал в VB6 в далеком прошлом, и столкнулся с приведенной ниже строкой и многими подобными. Мой вопрос, синтаксически, как выглядит эта строка «Get», как она делает или может сделать?Что делать в VB6?
Get #3, StartByte + Offset, StudentScrBytes
В рамках программы, всегда следуют 3 разделенных запятой элементов, а также с одним исключением, первый элемент является числом предшествует #. Второй способ всегда относится к числу, а третий - к одной переменной.
Я уверен, что я выяснил, что номера, предшествующие #, являются ссылкой на файл - при первом появлении Get появляется вместо # 3 или # 10 или # безотносительно, вместо этого у него есть переменная TempFile, инициализируется как FreeFile().
TempFile = FreeFile()
Open "c:\folerName.dir" For Binary Shared As TempFile
единственный материал, который я смог найти на Садись в VB6, кажется, относятся к ООП и геттеры/сеттеры. Возможно, я ошибаюсь, но я действительно не думаю, что это то, что здесь происходит, и все, что у меня есть, - это неопределенные догадки о том, что есть.
Вот функция, с которой была взята линия. Оба аргумента являются целыми числами.
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
Я думаю, получить бы получить что-то из указанного файла, за исключением того, что я не могу сказать, как (или если) файл даже указан на всех.
Документация: https://msdn.microsoft.com/en-us/library/office/gg278468.aspx (VBA, но идентичный VB6) – GSerg
Я хотел бы знать, как вы это нашли. Даже сейчас я не могу найти его через Google, попробовав 3 разных строки поиска! – donutguy640
Я знаю, что документация VB6 была снята, поэтому я искал «office vba get keyword», потому что я забыл, что такое 'get' (оператор? Предложение?). Это привело к https://msdn.microsoft.com/en-us/library/office/gg264285.aspx, что привело к https://msdn.microsoft.com/en-us/library/office/gg278468.aspx. – GSerg