Openfiledialog ile seçilen Metin belgesinde ki yazılanları nasıl Rich Text Box a aktarabilirim ?
Güncel bilen yok mu
Güncel bilen yok mu
Moderatör tarafında düzenlendi:
Follow along with the video below to see how to install our site as a web app on your home screen.
Not: This feature may not be available in some browsers.
[COLOR="RoyalBlue"]Dim[/COLOR] file [COLOR="RoyalBlue"]As[/COLOR] [COLOR="RoyalBlue"]String[/COLOR]
[COLOR="RoyalBlue"][COLOR="RoyalBlue"]If[/COLOR][/COLOR] OpenFileDialog.ShowDialog() = Windows.Forms.DialogResult.OK [COLOR="RoyalBlue"]Then[/COLOR]
[COLOR="RoyalBlue"]Dim[/COLOR] tmp [COLOR="RoyalBlue"]As[/COLOR] [COLOR="RoyalBlue"]String[/COLOR]
file = OpenFileDialog1.FileName 'Buraya URL Geliyo
[COLOR="RoyalBlue"]Dim[/COLOR] fs [COLOR="RoyalBlue"]As[/COLOR] FileStream = [COLOR="RoyalBlue"]New[/COLOR] FileStream(file, FileMode.Open)
[COLOR="RoyalBlue"]Dim[/COLOR] r [COLOR="RoyalBlue"]As[/COLOR] StreamReader = [COLOR="RoyalBlue"]New[/COLOR] StreamReader(fs)
Do
tmp = r.ReadLine
RichTextBox.Text = RichTextBox.Text & tmp & Microsoft.VisualBasic.ControlChars.CrLf
Loop Until tmp Is Nothing
r.Close()
fs.Close()
[COLOR="RoyalBlue"]End[/COLOR] [COLOR="RoyalBlue"][COLOR="RoyalBlue"]If[/COLOR][/COLOR]
[COLOR="RoyalBlue"]Imports[/COLOR] System.IO
[COLOR="RoyalBlue"]Public[/COLOR] [COLOR="RoyalBlue"]Class[/COLOR] Form1
Admin
Pass
123456
Administrator
Admin
Pass