Cum se introduce o foaie de calcul Excel într-un formular VB
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.