ciao ragazzi, ciao oregon e alka

vorrei aprire file random generici.

ho scritto questo cosice:

codice:
Type tpMio
    campo1 as string
    campo2 as string
end type


'LEGGE IL FILE DI TIPO RANDOM 
Public Function ReadFileR(PathFile As String) As tpMio
  Dim var As tpMio
  Dim f As Integer
  f = FreeFile
  Open PathFileFor Random As #f Len = Len(var)
      Get #f, 1, var
  Close #f
  ReadFileR = var
End Function
con


Ho questi dubbi:

1- è possibile generalizzare la variabile var, ossia dare la possibilità di variare il numero dei campi, pur mantenendo la stessa routine di lettura e se si, come si può fare?

2 - la linghezza di campo1 e campo2 in questo caso è variabile. E' quindi corretto scrivere
codice:
...
  Open PathFileFor Random As #f Len = Len(var)
...
3- Ho letto che non è possibile passare una variabile di tipo definito dall'utente ad una function (o una cosa simile). Quindi non si può implementare una function generica che scriva variabili ti tipo definito dall'utente in file random ?

Grazie per gli aiuti e la pazienza