Följande kod sker när man klickat på knappen btnKnapp.
txtFil är en textruta.
Jag får fel på det blåa
Dim sr As [b][blue]StreamReader[/blue][/b]
Dim sTemp As String
sr = [b][blue]File[/blue][/b].OpenText("C:\Övrigt\crew.txt")
txtFil.Text = sr.ReadToEnd()
sr.Close()
Du kan lägga till en helt vanlig knapp och sen hantera det hela i _Click
typ:
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
OpenFileDialog1.ShowDialog()
Dim filename As String
filename = OpenFileDialog1.FileName
TextBox3.Text = filename
End Sub
Då förutsätter jag att du har dragit ut en openfiledialog på ditt formulär som heter OpenFileDialog1 samt skapat en knapp som heter Button4 och har en textbox som heter TextBox3.
Jag föreslår att du tar en titt på någon tutorial samt skaffar nån bra bok och läser lite grundläggande om winforms :)
Du kan ange en encoding när du skapar din streamreader.
ex:
OpenFileDialog1.ShowDialog()
Dim filename As String
filename = OpenFileDialog1.FileName
Dim sr2 As StreamReader = New StreamReader(filename, _
System.Text.Encoding.UTF7, False, 512)
TextBox4.Text = sr2.ReadToEnd()
Om du klickar på ditt formulär i designläge kan du ange en ikon i properties-listen till höger
UTF7 används inte, vad jag vet. UTF8 är bättre om man vill spara i Unicode. Vill man öppna befintliga filer används oftast standardkodningen i operativsystemet. Den får du genom: System.Text.Encoding.GetEncoding(0)
En ikon skapar du genom File -> New File -> Icon. Använd sedan Icon-egenskapen för ditt fönster.
Det är bra att du har många böcker, men ingen bok kan ersätta dokumentationen (F1). Använd den!