Vb2008 Open File

/ Published in: VB.NET
Save to your folder(s)

Copy this code and paste it in your HTML
  1. On Error GoTo E
  2. Dim openit As New OpenFileDialog
  3. openit.ShowDialog()
  4. Dim readit As New System.IO.StreamReader(openit.FileName)
  5. RichTextBox1.Text = readit.ReadToEnd
  6. readit.Close()
  7. Exit sub
  8. E:
  9. End sub

Report this snippet


RSS Icon Subscribe to comments

You need to login to post a comment.