私は、誰かがVB6で書いたプログラムをsem-distantの過去に変更しようとしています。私の質問は、構文的には、この "Get"行は何をしているのか、そうしているのでしょうか?プログラム内VB6で何ができますか?
Get #3, StartByte + Offset, StudentScrBytes
、常に3コンマで区切られた項目が続くだし、一つの例外を除いて、最初のアイテムは、#によって先行数です。 2つ目は常に数値に解決され、3つ目は単一の変数に解決されます。
#で始まる数字がファイル参照であることがわかっています - #3または#10の代わりにGetが表示され、代わりに "TempFile"という変数がありますが、 FreeFile().
TempFile = FreeFile()
Open "c:\folerName.dir" For Binary Shared As TempFile
私はVB6でゲット上で見つけることができました唯一のものとして初期化、OOPとゲッター/セッターに関連しているようです。たぶん私は間違っていますが、実際にはそれがここで起こっているとは思わないし、私が持っているのは漠然とした推測です。
ここでは、回線を取得した機能を示します。どちらの引数も整数です。
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
これをどのように見つけたのかを知りたいと思います。今でも、私は3つの異なる検索文字列を試してGoogleで見つけることはできません! – donutguy640
私はVB6のドキュメントが削除されたので、 'get v2 '(オペレータは?節)を忘れていたので、' office vba get keyword'を検索しました。 https://msdn.microsoft.com/en-us/library/office/gg264285.aspxにつながり、https://msdn.microsoft.com/en-us/library/office/gg278468.aspxにつながりました。 – GSerg