VB.NET 2010 usuwanie tekstu z pliku lub zamienianie tekstu w pliku

[QerDark]

Szukałem dużo w internecie i no mogłem znaleźć. Jak edytować plik tekstowy.

Przykładowo w pliku mam tylko liczbę 1024 po odpaleniu pewnego okna w ComboBox wyświetla mi się właśnie ta liczba.
Mogę w ComboBox ustawić wartość 1024/2048/4096 po ustawieniu klikam przycisk.

I chcę żeby moje 1024 w tamtym pliku zostało zmienione na wybrane czyli np. 2048. <<== Chodzi o kod tylko do tego zdania!

Dla mnie obojętne czy usuniecie plik i stworzycie nowy albo usuniecie tekst z pliku i dodacie odpowiedni.
Ważne żeby kod był jak najkrótszy i działał.

 

Dotychczasowy kod:
 

        Dim Ram As String
        Ram$ = ComboBox1.Text
        FileOpen(1, "D:\MineQ\ram.txt", OpenMode.Append)
        Write(1, Ram$)
        FileClose(1)

Tworzy zmienną (czy tam stałą) Ram i przypisuje jej wartość która jest w okienku niestety wygląda to tak

"wartość_z_okienka"

Później otwiera plik. Dodaje do pliku wartość "wartość_z_okienka" i wygląda to tak:

1024"wartość_z_okienka"

potem zamyka plik.

 

Z góry dziękuję wynagrodzę plusami

 

@Edit

Mam też drugi problem mam taki kod:

        Dim openfile As New OpenFileDialog
        openfile.Filter = "TXT files|*.txt"
        If openfile.ShowDialog = Windows.Forms.DialogResult.OK Then
            ComboBox1.Items.Clear()
            Dim read_text As New StreamReader(openfile.FileName, System.Text.Encoding.GetEncoding(1250))
            Try
                Do While read_text.Peek >= 0
                    ComboBox1.Items.Add(read_text.ReadLine)
                Loop
                read_text.Close()
            Catch
            End Try
        End If

Jest krótki i bardzo fajnie Ale wyskakuje mi okienko żebym sobie wybrał plik. Jakby ktoś to przerobił żeby wpisywało się ścieżkę do pliku w kodzie.

[Gość]

Replacowanie tego 1024 na 2048:

Replace(TestString, "1024", "2048") <- gdzie TestString to string gdzie przechowujesz tekst.

Tam gdzie masz textbox.Text możesz se to zamienić na każdą formatke:

ComboBox1.Items.Clear()
Dim read_text As New StreamReader(textbox.Text, System.Text.Encoding.GetEncoding(1250))
Try
Do While read_text.Peek >= 0
ComboBox1.Items.Add(read_text.ReadLine)
Loop
read_text.Close()
Catch
End Try

[Skr.]

Znając życie launcher, nie lepiej użyć do zapisywania takich informacji My.Settings? Więcej informacji: http://msdn.microsoft.com/pl-pl/library/saa62613.aspx

[QerDark]

Znając życie launcher, nie lepiej użyć do zapisywania takich informacji My.Settings? Więcej informacji: http://msdn.microsoft.com/pl-pl/library/saa62613.aspx

Możliwe że użyje My.Settings ale to co napisał Soukyan też się przyda..