2016-10-01 22 views
3

我正試圖修改某人在VB6中寫過的程序,並且遇到了下面這行以及許多類似的行。我的問題是,在句法上,這個「Get」行看起來像是或可能做什麼?在VB6中做什麼?

Get #3, StartByte + Offset, StudentScrBytes 

在此程序,它總是跟着3逗號分隔的項目,並有一個例外,第一個項目就是以#開頭的數字。第二看起來總是解決一個數字,第三個單一變量。

我很確定我已經想出了以#開頭的數字是文件引用 - 第一次出現Get,而不是#3或#10或#whatever,它有一個變量「TempFile」初始化爲FreeFile().

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

唯一的東西,我已經能夠找到獲取VB6,似乎涉及到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 

我想獲得將獲得從指定的文件的東西,但我不能告訴如何(或者)的文件,即使是在所有指定。

+3

文檔:https://msdn.microsoft.com/en-us/library/office/gg278468.aspx(VBA,但與VB6相同) – GSerg

+0

我想知道您是如何找到它的。即使現在,我也無法通過Google找到它,嘗試3種不同的搜索字符串! – donutguy640

+1

我知道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

回答

5

看一看原來的MS VB6文檔:

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

您還可能有興趣在其對應的認沽:

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我的機器上的兩個第一谷歌的答案。