Advertisement
5_2007-2008 String Manipulation #176373

ReadFile

Read an entire text file into a string in one call.

AI

AI 요약: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

소스 코드
original-source
Public Function ReadFile(ByVal sFileName As String) As String
  Dim fhFile As Integer
  fhFile = FreeFile
  Open sFileName For Binary As #fhFile
  ReadFile = Input$(LOF(fhFile), fhFile)
  Close #fhFile
End Function

Upload
원본 댓글 (3)
Wayback Machine에서 복구됨