Need vb5 program to read files

mosquito56

Does anyone have a vb5 program that opens a file and reads it?

I am very a pro at vb pro but the new vb is a pain
It would save me a few hours if someone could share the new vb program.

Thanx

Don

▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
·······

······· "What do you mean, it doesn't have any tubes?"
······· "No such thing as a dumb question" unless it's on the internet
········

Cluso99

Here is a cut piece of VB6 code I use to read a binary file

Private Sub GetFile(fname As String)
Dim FileNo As Integer
Dim FileName As String
Dim FileName2 As String
Dim FileSize As String
Dim line As String
Dim lines As String
Dim i, j As Long
Dim bytes() As Byte
Dim txt As String
Dim b As Byte
Dim z As Integer

    FileNo = FreeFile
'    FileName = "D:\Propeller\ZiCogFiles\CPM_64KB.RAM"
    FileName = fname
    txtStatus.Text = "Opening..." & FileName
    txtStatus.Refresh
    
     
    FileSize = FileLen(FileName)                            ' Returns file length (bytes).
    ReDim bytes(0 To FileSize - 1)                          ' make correct size
    Open FileName For Binary As FileNo
    Get FileNo, , bytes                                     ' gets complete binary file
    Close FileNo
    txtStatus.Text = "File loaded"
    txtStatus.Refresh

▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
Links to other interesting threads:

· Home of the MultiBladeProps: TriBladeProp, SixBladeProp, website (Multiple propeller pcbs)
· Single Board Computer:·3 Propeller ICs·and a·TriBladeProp board (ZiCog Z80 Emulator)
· Prop Tools under Development or Completed (Index)
· Emulators: Micros eg Altair, and Terminals eg VT100 (Index)
· Search the Propeller forums (via Google)
My cruising website is: ·www.bluemagic.biz·· MultiBladeProp is: www.bluemagic.biz/cluso.htm