[VB2012] Gioco parole mancanti

[SnowEagle]

Salve a tutti, di nuovo, .
Avrei bisogno di un aiuto sul creare un gicohino, parole mancanti, in visual basic. Solo che non so da dove dovrei iniziare. Io so solo come inserire, una sola parola, in un file di testo, che salva in un determinato percorso:

Dim sr As New System.IO.StreamWriter("C:\testo.txt")
        sr.WriteLine(TextBox1.Text)
        sr.Close()

ecco lo schema del mio progetto,

[SnowEagle]

scusate ho sbagliato sezione, nn e che potete spostarlo
Grazie e scusate

[SnowEagle]

qualcuno ha qualche idea?

[optime]

esattamente *cosa* non sai fare?

[SnowEagle]

diciamo questo

If TextBox1.Text = "cammin" Then
            MsgBox("corretto")
        End If

solo che ho inserito due label e in mezzo la texbox. Nelle label ho scritto una parte del testo.
Ma io vorrei mettere all'interno del codice tutto il testo, così quando ho inserito tutte le parole mancanti, mi stampa tutto il testo completo. Diciamo come quando devi compilare un modulo.

[stellinaxxx]

Potresti fare così, supponendo di fermarci alle prime 3 righe:

        Dim riga As String()
        Using sr As StreamReader = New StreamReader("C:\testo.txt")
            For x = 0 To 2
                ReDim Preserve riga(x)
                riga(x) = sr.ReadLine
                Select Case x
                    Case 0
                        riga(x) = riga(x).Substring(0, 14) & "cammin" & riga(x).Substring(14)
                    Case 2
                        riga(x) = riga(x).Substring(0, 7) & "diritta via" & riga(x).Substring(7)
                End Select
            Next
            sr.Close()
        End Using
        Using sw As StreamWriter = New StreamWriter("C:\testo.txt")
            For y = 0 To 2
                sw.WriteLine(riga(y))
            Next
            sw.Close()
        End Using

[stellinaxxx]

Scusa, io pensavo che avessi il file di testo già esistente senza le parole mancanti.
Comunque basta che sostituisci alla prima parte in cui legge il file i testi delle label e delle textbox.

[SnowEagle]

ok funziona alla perfezione, dopo aver modificato riga e colonna.
Grazie mille

p.s ho provato a mettere il file testo(quello con le parole mancanti) nelle risorse del programma, ma quando vado ad inserire il codice

Using sr As StreamReader = New StreamReader(My.resource.Testo)

mi da errore, come mai?

[oregon]

"Mi dà errore", come saprai, non serve a poterti dare un aiuto ...

[SnowEagle]

questo e l'errore