Cum se introduce o foaie de calcul Excel într-un formular VB

Aveți posibilitatea să creați un proiect Visual Basic care afișează conținutul Excel.

Pasul 1

Deschideți Microsoft Excel și introduceți "A" în "A1", "B" în "B1", "Coloana A" în "A2" și "Coloana B" în "B2". Salvați foaia de calcul în "C: \" ca "ExcelFile.xlsx".

Pasul 2

Deschideți Microsoft Visual Basic 2010 Express, faceți clic pe meniul "File" și selectați "New Project". Faceți clic pe "Șabloane instalate", selectați "Windows Forms Application" și faceți clic pe "OK".

Pasul 3

Apăsați "Ctrl" + "Alt" + "X" pentru a deschide fereastra "Toolbox". Faceți dublu clic pe "DataGridView" pentru a adăuga un nou control Grid vizualizare date la "Form1". Faceți dublu clic pe "Buton" din "Toolbox" pentru a adăuga un nou buton la "Form1".

Pasul 4

Faceți dublu clic pe butonul "1" pentru a deschide modulul "Form1.vb". Introduceți următoarele informații despre "Formular public Form1":

Importa sistemul.Data.OleDb

Pasul 5

Introduceți următoarele în "Private Sub Button1_Click" pentru a declara un "DataSet" și a defini conexiunea cu Excel:

Dim ds Ca nou DataSet () Dim connectionString As String = "Provider = Microsoft.ACE.OLEDB.12.0;" & _ "Sursa de date = C: \ ExcelFile.xlsx;" & _ "Proprietăți extinse = Excel 12.0;"

Pasul 6

Introduceți următoarele pentru a vă conecta la fișierul "ExceFile.xlsx" și completați "DataSet":

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

Pasul 7

Introduceți următoarele pentru a afișa foaia de calcul în Vizualizare grilă de date:

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

Apăsați "F5" pentru a rula programul și apăsați "Button1" pentru a importa foaia de calcul Excel.