クイックBASICをVB.Netに変換する - ランダムアクセスファイル

Question

私は古いQuick BASICプログラムをVB.Netに変換しようとしています。古いファイルの文を直接置き換えることはありません。私の単純なニーズのためにデータベースを構築することは過度のようです。

VB.Netで次の操作を行うにはどうすればよいですか？

OPEN "test.dat" FOR RANDOM AS #1 LEN = 20 
FIELD #1, 10 AS a$, 10 AS b$ 
LSET a$ = "One" 
LSET b$ = "Two" 
PUT #1, 1 
GET #1, 1 
PRINT a$, b$ 
CLOSE #1 

Answer 1

Microsoft.VisualBasic.FileOpen、FilePut、そしてFileGet文は、上記のコードのほとんどのためにかなり直接的な代替品でなければなりません。

Microsoft.VisualBasic.FileOpen(1, "test.dat", OpenMode.Random, OpenAccess.ReadWrite, OpenShare.Shared) 

    Dim output As New Fields 

    output.A = "One" 
    output.B = "Two" 

    Microsoft.VisualBasic.FilePut(1, output, 1) 

    Dim input As New Fields 

    Microsoft.VisualBasic.FileGet(1, input, 1) 

    Debug.WriteLine("A = " & input.A & "; B = " & input.B) 

    FileClose(1)