Перевод кода из С++ в Visual Basic 6 - VB

Узнай цену своей работы

Формулировка задачи:

Интересует перевод такого момента: читаю файл до конца:
хотелось бы узнать как можно перевести fscanf...

Решение задачи: «Перевод кода из С++ в Visual Basic 6»

textual
Листинг программы
Option Explicit
 
Private Sub Form_Load()
    Dim ff      As Integer
    Dim s  As String
    Dim File    As String
    
    File = "c:\users\alex\desktop\WinDbg.txt"
    
    ff = FreeFile()
    Open File For Binary Access Read As #ff
        s = String(Lof(ff), vbnullchar)
        Get #ff, , s
    Close #ff
    
    Stop
End Sub

Оцени полезность:

9   голосов , оценка 4.111 из 5