Menggunakan OpenFileDialog untuk membuka file di VB.Net

Posted by : HD Technology Studio Jumat, 01 September 2017

Sebelumnya saya telah membuat artikel tentang menyimpan file dengan SaveFileDialog Control. Silahkan baca disini

Seperti biasanya saya asumsikan anda telah menginstal vb.net atau visual studio. Dan telah membuat project baru, silahkan lihat artikel berikut untuk cara membuat project baru. Kontrol OpenFileDialog meminta pengguna untuk membuka file dan memmungkinkan pengguna untuk memilih file yang akan dibuka. Pengguna dapat memeriksa apakah file itu ada dan kemudian membukanya. Didalam tutorial ini saya juga menggunakan StreamReader untuk membaca file. StreamReader terdapat dalam paket System.IO.

Pertama desainlah sebuah form seperti gambar berikut ini. Disini saya menggunakan 1 buah RichTextBox, 1 buah Button, dan 1 buah OpenFileDialog

Atur properties pada masing – masing object seperti berikut ini :

Tool	Properti	Nilai
RichTextBox1	Name	txtTeks
Button1	Name	btnopen
	Text	Open File

Double klik pada btnopen kemudian tulis kode berikut ini. Karena disini menggunakan paket System.IO, maka import paket System.IO dengan cara tambahkan kode Imports.System.IO pada bagian paling atas sendiri.
Kemudian tulis kode berikut pada event btnopen_click. Buat sebuah variabel bernama oReader.

Dim oReader As StreamReader

Dan tulis kode berikut untuk mengosongkan File Name dan untuk memberi informasi atau menentukan jenis file yang dapat dibuka

OpenFileDialog1.FileName = ""

OpenFileDialog1.Filter = "Text Files (*.txt)|*.txt|All Files (*.*)|*.*"

Tulis pula kode berikut untuk membuka file yang telah dipilih.

If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then

oReader = New StreamReader(OpenFileDialog1.FileName, True)

txtTeks.Text = oReader.ReadToEnd

End If

Sehingga kode lengkapnya seperti gambar berikut ini.

Jika selesai jalankan programnya jika tidak terjadi error maka telah berhasil
Demikian tutorial, nantikan tutorial selanjutnya. Download source code nya disini