VB Eingaben in Text einfügen

10/21/2010 00:01 roteisenklinge#1
Hallo liebe Coder,
ich habe ein kleines Problem. Ich möchte mir ein Programm schreiben, das für mich automatisch text Dateien erstellt.

Dies sieht folgendermaßen aus:

[Only registered and activated users can see links. Click Here To Register...]


Mein Code:


Code:
    Dim A
        Dim B
        Dim C
        Dim D
        Dim E
        Dim F

        A = TextBox1
        B = TextBox2
        C = TextBox3
        D = TextBox4
        E = TextBox5



        F= 

        Label7 = F
Die Eingaben werden ja in die Variabelen A,B,C,... übertragen.

Nun wollte ich machen

F = " <Bot geh zur Posstition C und D >"

Für C sollte nun der eingegebene Koordinatencode sein genauso wie bei D. Aber wie definiere ich das?

Nächstes Problem, wie gebe ich das am besten dann aus. Als LabelBox, oder gibt es eine bessere Möglichkeit?

lg Rek

Edit* Ich möchte am Ende verschiedene .txt Dokumente haben in denen Das selbe steht, jedoch die Werte unterschiedlich sind die ich definiert habe!
10/21/2010 00:21 Jeoni#2
Um das, was in den Textboxen steht in Variablen zu kriegen ist das falsch. Mach das so:
[coder]Dim A As String = TextBox1.Text
Dim B As String = TextBox2.Text
...[/code]

Damit hättest du schonmal die Variablen. :awesome: Jetzt kommt F (verstehe nicht so genau was du willst mit F und den Textdateien). Also:
Code:
Dim F As String = C & VBCRLF & D
Label1.Text = F
Damit hättest du 2 Koordinaten untereinander geschrieben (Kann man natürlich noch fortführen) und in dem Label 'Label1' ausgegeben. Diese kannst du dann folgendermaßen in eine Datei schreiben:
Code:
Dim writer As New IO.StreamWriter(My.Application.Info.DirectoryPath & "\Koordinaten1.txt")

writer.Write(F)
writer.Close()
Das nach 'New IO.StreamWriter(' kann man ja variieren oder aus einer TextBox(.Text) auslesen um die Koordinaten in eine Datei zu schreiben die vom User ausgewählt werden kann. ;)
Um es irgendwann wieder auszulesen machst du das so:
Code:
Dim reader As New StreamReader(My.Application.Info.DirectoryPath & "\Koordinaten1.txt")
Dim Koords = reader.ReadToEnd()
reader.Close()
Label1.Text = Koords
Naja, eigentlich gehört das so ziemlich zu den Grundlagen. Wenn du Fragen hast PN mich ;)

Hoffe ich konnte helfen
Jeoni

P.S.: Hab jetzt ziemlich mehr geschrieben als ich eigentlich wollte, aber naja. Thx wäre nett.
10/21/2010 08:11 roteisenklinge#3
Hey,
danke erstmal , hab dir ne PN geschickt:=)