johannetje2
Gebruiker
- Lid geworden
- 26 okt 2008
- Berichten
- 247
Hey!
Hoe kan ik een TXT bestand in een richtextbox openen ZONDER openfiledialog?
Hoe kan ik een TXT bestand in een richtextbox openen ZONDER openfiledialog?
Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Dim OpenFile As New OpenFileDialog
With OpenFile
.Title = "Titel"
.Filter = "*.txt|txt"
End With
If OpenFile.ShowDialog = DialogResult.OK Then
'code voor het invullen van de RichTextBox
End If
Dim OpenFile As New OpenFileDialog
With OpenFile
OpenFile.FileName = "C:\Users\Johan Wenting\Documents\Leger.txt"
.Title = "Titel"
.Filter = "*.txt|txt"
End With
If OpenFile.ShowDialog = DialogResult.OK Then
Try
Dim Read As New System.IO.StreamReader(OpenFile.FileName)
RichTextBox1.Text = Read.ReadToEnd
Read.Close()
Catch ex As Exception
End Try
End If
Try
Dim ReadFile As New StreamReader("C:\file.txt") 'Vetgeet dit niet aan te passen
RichTextBox1.Text = ReadFile.ReadToEnd
ReadFile.Close()
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical)
End Try
Dus je wilt helemaal geen dialogbox zien? In dat geval is een StreamReader alles wat je nodig hebt:
Code:Try Dim ReadFile As New StreamReader("C:\file.txt") 'Vetgeet dit niet aan te passen RichTextBox1.Text = ReadFile.ReadToEnd ReadFile.Close() Catch ex As Exception MsgBox(ex.Message, MsgBoxStyle.Critical) End Try
Ook even Imports System.IO op regel 1 plaatsen, anders zegt tie dat StreamReader niet gedefineerd is.
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.