Jak vložit tabulku aplikace Excel do formuláře VB
Krok 1
Otevřete aplikaci Microsoft Excel a v části "A1", "B" v části "B1", "Sloupec A" v části "A2" a "Sloupec B" v části "B2". Uložte tabulku v "C: \" jako "ExcelFile.xlsx".
Krok 2
Otevřete aplikaci Microsoft Visual Basic 2010 Express, klepněte na nabídku "Soubor" a vyberte "Nový projekt". Klikněte na "Instalované šablony", vyberte "Windows Forms Application" a klikněte na "OK".
Krok 3
Stisknutím klávesy "Ctrl" + "Alt" + "X" otevřete okno "Toolbox". Poklepáním na položku "DataGridView" přidejte nový ovládací prvek zobrazení datové mřížky na "Form1". Poklepáním na tlačítko "Button" uvnitř "Toolbox" přidáte nové tlačítko na "Form1".
Krok 4
Poklepáním na tlačítko "Button1" otevřete modul "Form1.vb". Zadejte následující informace o "Formě veřejné třídy1":
Importuje systém.Data.OleDb
Krok 5
Zadejte následující v "Private Sub Button1_Click" deklarovat "DataSet" a definovat připojení s aplikací Excel:
Dim ds Jako nový datový soubor () Dim connectionString jako String = "Provider = Microsoft.ACE.OLEDB.12.0;" & _ "Zdroj dat = C: \ ExcelFile.xlsx;" & _ "Rozšířené vlastnosti = Excel 12.0;"
Krok 6
Zadejte následující příkaz pro připojení k souboru "ExceFile.xlsx" a dokončete "DataSet":
Dim excelData jako nový OleDbDataAdapter ("SELECT FROM FROM [Sheet1 $]", connectionString) excelData.TableMappings.Add ("Table", "ExcelSheet") excelData.Fill (ds)
Krok 7
Zadejte následující postup pro zobrazení tabulky v zobrazení datové mřížky:
Me.DataGridView1.DataSource = ds.Tables (0) Me.Refresh ()
Stisknutím tlačítka "F5" spustíte program a stisknutím tlačítka "Tlačítko1" importujete tabulku aplikace Excel.