VB6, Fensterinhalt dynamisch aus Text einlesen

Public Sub Command1_Click()
Dim [Variablendeklaration]

'Öffnen der Ini-Datei
  MyIniFile = App.Path & \ & mathos.ini
 
'Zeiger auslesen, welcher Datensatz zuletzt gezeigt gelesen wurde
  i = INILesen(Datensatz, Nummer, MyIniFile)

'Auslesen, wie oft der Datensatz ausgelesen werden soll
  Anzahl = INILesen(Aufgaben, Anzahl, MyIniFile)

'Zeiger mit Datensatzanzahl vergleichen und wiederholen, solange der Zeiger kleiner ist. 
  If i < Anzahl Then

'Form neuladen und damit den nächsten Datensatz anzeigen
  dlg_aufgaben.Form_Load

  Else

'Bei erreichen der Datensatzanzahl den Zeiger zurücksetzen,...
  Dummy$ = INISchreiben(Datensatz, Nummer, 0, MyIniFile)

' ...den Abschiedsdialog öffnen... 
  frm_main.Form_Ende

'...und den aktuellen Dialog schliessen
   Unload Me 
   End If

   End Sub

_______________________________________________

Public Sub Form_Load()

 
 Dim [Variablendeklaration]

' Öffnen der INI-Datei, Zeiger auslesen, hochsetzen und zurückschreiben.
  MyIniFile = App.Path & \ & mathos.ini
  i = INILesen(Datensatz, Nummer, MyIniFile)
  i = i + 1
  Dummy$ = INISchreiben(Datensatz, Nummer, i, MyIniFile)

'Datensatzdatei öffnen
  MyDataFile = App.Path & \ & mathos.dat

'Datensatznummer übergeben und in der Variablen Aufgabe speichern.
'(Datensatz Nr. 1 ist 1 = [Datensatz], Datensatz Nr.2 ist 2 = [Datensatz], etc.)
' - Ja, ich habe Streit mit Variablen-Deklarationen, und hier stark improvisiert ;)

  satz$ =  & i & 
  sAufgabe = INILesen(Aufgaben, satz$, MyDataFile)

'Zuweisen des Datensatzes zum entsprechenden Textfeld
  lblaufgabe.Caption = sAufgabe
   
End Sub