Visual Basic - Archivos en VB

Me gustaría que alguien me dijera la forma de manejar archivos com VB, porque no tengo ni idea. Me gustaría que me dijerais funciones parecidas a fgetc de C ya que tengo que tratar el texto caracter a caracter. De todas formas agradecería cualquier información sobre archivos en VB.

Muchas gracias

On Error GoTo ErrorActivate
Dim sFile As String
Dim iFree As Integer
Dim sBuffer As String
Dim iLen As Long

sFile = App.Path
If Right$(sFile, 1) <> \\\"\\\\\\\" Then
sFile = sFile & \\\"\\\\\\\"
End If
sFile = sFile & File1 \\\'dir=llista puede ser txt o explorador
iFree = FreeFile
Open sFile For Binary As iFree
iLen = LOF(iFree)
sBuffer = Space$(iLen)
Get #iFree, , sBuffer
txt.Text = sBuffer
Close #iFree
Exit Sub

ErrorActivate:
MsgBox Err.Description, vbExclamation, \\\"dir1+text1 Error\\\"

para abrir archivos binarios es asi como lo pusieron antes.
Solo yo haria un loop porque si es un archivo grande se me paraliza el programa.

Dim sFile as String, sData as String

Open sFile For Binary As #1 \'abrimos el archivo en modo binario

Do Until LOF(1) = Loc(1) Or EOF(1) \'hara el loop hasta que encuente el final del archivo o lea todo los bytes

sData = String(2048, 0) \'esto es lo diferente porque puse 2048 que es si son 2kb, entonces sData puede conetener 2kb
Get #1, , sData \'leera 2 kb

Loop

Close #1 \' cerramos el archivo que abrimos

espero te sirva
maCo