Din Excel-regneark giver oplysninger, der anvendes i Visual Basic ( VB) applikationer. VB formularer indeholder interne Excel -forbindelser til at forespørge data. De oplysninger, du forespørge er derefter bruges til at vise , beregne eller manipulere data. Du opretter forbindelse til et Excel-regneark fra VB anvender lignende teknikker, der anvendes til at forespørge en Access- database eller SQL Server. VB sproget giver en enkel måde at bruge din Excel-regneark i ethvert skrivebord eller web-applikation. Instruktioner
1
Opret forbindelsen strengen , der peger på Excel-regneark -fil . Strengen faktisk ikke forbinde indtil forbindelsen kaldes, men den sætter op kommandoen bruges til at fastgøre VB til Excel. Følgende kode opsætter din forbindelse string : Hej
Dim conn As String = " Provider = Microsoft.Jet.OLEDB.4.0 ; Datakilde = C: \\ theExcelFile.xls , udvidede egenskaber =" " Excel 8.0; " " "
Erstat " C: \\ theExcelFile.xls " med navnet på din Excel-regneark fil
2
Tilslut og forespørge Excel-regneark . . Den " OLE Adapter " forbinder til forskellige filer på din harddisk fra Visual Basic. OLE Adapter håndterer oversættelse mellem VB kode og Excel formateret fil . Følgende udvælger alle poster fra den første regneark :
Dim data As New OledbDataAdapter ( " select * from [ Ark1 $] " , conn )
Bemærk " conn " tilslutning string variabel indsættes til adapteren.
3
Fyld din datasæt , så du kan bruge de returnerede værdier i andre områder af din VB kode. Et datasæt er en grundlæggende enhed, der bruges til at indeholde alle de poster hentet fra enhver datakilde såsom Excel, Access eller SQL Server. Brug følgende kode til " fylde " datasættet med de returnerede Excel værdier : Hej
Dim datasæt Som New DataSet () data.TableMappings.Add ( "Tabel" , " Excel " ) data.Fill ( datasæt)
4
Vis Excel-fil indhold til brugeren. Den nemmeste måde at vise data hentet fra en database eller fil bruger en " GridView " objekt . Følgende kode viser resultaterne fra Excel til VB formular : Hej
theGrid.DataSource = dataset.Tables (0) DefaultViewtheGrid.DataBind ()
.