Kaip įterpti Excel skaičiuoklę į VB formą

Naudinga žinoti, kaip Visual Basic .NET projekte rodyti „Microsoft Excel“ skaičiuoklę, kad būtų galima toliau manipuliuoti duomenimis. „Excel“ – tai „Microsoft Office“ paketo skaičiuoklių programa, siūlanti daug įrankių didelių duomenų kiekių analizei. „Visual Basic“ – „Microsoft“ sukurta programavimo kalba, populiari dėl lankstumo. Šiame straipsnyje pateikiami paprasti žingsniai, kaip sukurti VB projektą, kuris įkels ir parodytų duomenis iš „Excel“ failo.

1 žingsnis

Atidarykite „Microsoft Excel“ ir įveskite „A“ į langelį A1, „B“ į B1, „Column A“ į A2 ir „Column B“ į B2. Išsaugokite failą C:\\ExcelFile.xlsx.

2 žingsnis

Atidarykite „Microsoft Visual Basic 2010 Express“, meniu File pasirinkite New Project. Pasirinkite Installed Templates → Windows Forms Application ir spustelėkite OK.

3 žingsnis

Paspauskite Ctrl+Alt+X, kad atidarytumėte „Toolbox“. Du kartus spustelėkite DataGridView, kad į formą Form1 pridėtumėte duomenų tinklelio valdiklį. Tada du kartus spustelėkite Button, kad pridėtumėte mygtuką.

4 žingsnis

Du kartus spustelėkite Button1, kad atsidarytų Form1.vb kodas. Prieš Public Class Form1 pridėkite importą:

Imports System.Data.OleDb

5 žingsnis

Mygtuko Button1_Click procedūroje sukurkite DataSet ir nurodykite ryšio eilutę į Excel failą:

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;HDR=YES\";"

6 žingsnis

Pridėkite duomenų adapterį ir užpildykite DataSet:

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

Galiausiai susiekite duomenų šaltinį su tinklelio valdikliu ir atnaujinkite formą:

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

Paspauskite F5, kad paleistumėte programą, ir spustelėkite mygtuką Button1. Excel duomenys bus įkeliami į DataGridView.