Menyisipkan Spreadsheet Excel ke Dalam Borang VB.NET

Mengguna Visual Basic .NET sering memerlukan cara mudah untuk memaparkan spreadsheet Microsoft Excel dan memanipulasi data secara lanjut. Excel, sebagai aplikasi spreadsheet dalam suite Microsoft Office, menawarkan pelbagai alat analisis data besar. Visual Basic, bahasa pengaturcaraan yang dikembangkan oleh Microsoft, popular di kalangan pembangun kerana fleksibiliti dan kesederhanaannya.

Langkah 1

Buka Microsoft Excel dan masukkan "A" ke sel A1, "B" ke sel B1, "Column A" ke sel A2 dan "Column B" ke sel B2. Simpan fail spreadsheet anda di "C:\" sebagai ExcelFile.xlsx.

Langkah 2

Buka Microsoft Visual Basic 2010 Express, klik menu File dan pilih New Project. Pilih Installed Templates, pilih Windows Forms Application dan klik OK.

Langkah 3

Tekan Ctrl + Alt + X untuk membuka Toolbox. Dwi-klik DataGridView untuk menambah kontrol Data Grid View baru ke Form1. Dwi-klik Button di Toolbox untuk menambah butang baru ke Form1.

Langkah 4

Dwi-klik Button1 untuk membuka modul Form1.vb. Tambahkan baris berikut di atas Public Class Form1:

Imports System.Data.OleDb

Langkah 5

Di dalam sub Button1_Click, masukkan kod berikut untuk membuat DataSet dan tetapkan sambungan Excel:

Dim ds As New DataSet()
Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;" & _
"Data Source=C:\ExcelFile.xlsx;" & _
"Extended Properties=Excel 12.0;"

Langkah 6

Sambungkan ke fail ExcelFile.xlsx dan isikan DataSet:

Dim excelData As New OleDbDataAdapter("SELECT * FROM [Sheet1$]", connectionString)
excelData.TableMappings.Add("Table", "ExcelSheet")
excelData.Fill(ds)

Paparkan spreadsheet di DataGridView:

Me.DataGridView1.DataSource = ds.Tables(0)
Me.Refresh()

Tekan F5 untuk jalankan program dan klik Button1 untuk memuatkan spreadsheet Excel.