vb: ausgabe in ein msflexgrid

Code:

With MSFlexGrid1
    .AddItem "Neues Item (Zeile)" ---> fügt eine neue Zeile hinzu
    .Col = 1  --> setzt die Spalte fest
    .Row = 1  --> letgt die Zeile fest
    .Text = "1st Cell"  --> durch die "Koordinaten" hast jetzt eine Zelle,
Text reinschreiben
End With

Noch nett in eine Schleife verpacken, leicht abändern...

Möglicherweise geht's noch einfacher, hab' noch nie was damit gemacht. Die Hilfe dazu ist eh sehr ergiebig

fock na schaut jetz so aus:

Code:

Private Sub cmdAusgabe_Click()
    Open "d:\datei.dat" For Input As #1
        
End Sub

Private Sub Form_Load()
    GridListe.Rows = 35
    GridListe.FixedRows = 1
    GridListe.Cols = 7
    GridListe.FixedCols = 0
    For spalte = 0 To 6
        GridListe.ColWidth(spalte) = 1500
    Next spalte
   
    
    GridListe.Row = 0
    For spalte = 0 To 6
        GridListe.Col = spalte
    If spalte = 0 Then
        GridListe.Text = "Zuname"
    ElseIf spalte = 1 Then
        GridListe.Text = "Vorname"
    ElseIf spalte = 2 Then
        GridListe.Text = "PLZ"
    ElseIf spalte = 3 Then
        GridListe.Text = "Ort"
    ElseIf spalte = 4 Then
        GridListe.Text = "Straße"
    ElseIf spalte = 5 Then
        GridListe.Text = "Klasse"
    ElseIf spalte = 6 Then
        GridListe.Text = "Schülernr."
    End If
    Next spalte
End Sub

bei dem open muss ich jetz a do loop schleife machen die sollte so ausschauen

Code:

do until EOF(1)
read..

und was muss ich bei dem read schreiben das jeder datensatz einzeln in a zeile gschrieben wird?

datensatz ist eine string variable

meines wissens kann man die ganze zeile auf einmal ins flexgrid reinschreiben wennst einfach die additem methode anwendest und die spalten durch das zeichen "|" trennst!!

ich habs in einem beispiel halt so gesehen!