2017-05-05 7 views
0

Ich möchte einige Texte in einer Datei anhängen.Text am Ende der Zeile anhängen VB .NET

habe ich diesen Code Text aus einer Datei anhängen

Dim Lines As List(Of String) = ReadAllLines(Script_Path_DiskPart & File_MakeVDISK).ToList() 
Lines.Insert(0, Frm_Login.AmountDisk & " Type=" & ChrW(34) & "EXPANDABLE" & ChrW(34)) 
System.IO.File.WriteAllLines(Script_Path_DiskPart & File_MakeVDISK, Lines) 

Und das ist, was ich nach System.File.WriteAllLines(Script_Path_Diskpart & File_MakeVDISK, Lines)

Unerwartetes Ergebnis:

enter image description here

Erwartetes Ergebnis:

enter image description here

Eigentlich möchte ich System.IO.File.Append... verwenden, aber ich weiß nicht, wie es funktioniert ...

+0

Es scheint, dass Ihre Frm_Login.AmountDisk nur die Nummer 1024 enthält. Wenn Sie den anderen Text möchten, müssen Sie ihn vor dieser Nummer hinzufügen. (Und vergiss nicht, auch eine Environment.NewLine hinzuzufügen, wenn du an dieser Stelle einen Zeilenumbruch haben willst) – Steve

+2

Nun, wenn du in das Zeilen-Array an Position 0 eingibst, werden die Daten in Position 0 gesetzt. Du bist nicht an a angehängt line – Plutonix

Antwort

1

Es ist wie anstelle der Lines.Insert Aussage aussieht, wollen Sie so etwas wie dies zu tun:

Lines(0) = Lines(0) & Frm_Login.AmountDisk & " Type=""EXPANDABLE""" 

Beachten Sie, dass Sie ein Anführungszeichen mit einem anderen Anführungszeichen umgehen können, anstatt die ChrW zu verwenden, daher das Paar der doppelten Anführungszeichen "" um "EXPANDABLE".

+0

Kann ich 'Lines (0) & = Frm_Login.AmountDisk &" Type = "" Expandable "" "stattdessen verwenden? – Karuntos

+0

Ja, das kannst du tun. – Craig

Verwandte Themen