Hvordan lese xls-fil Vb

August 8

Lære å lese en Microsoft Office Excel-fil ved hjelp av Visual Basic.NET (VB.NET) kan du spare tid hvis du trenger å lese Excel-filer. Excel er et regnearkprogram inkludert i Microsoft Office-pakken vanligvis brukes til å analysere data. VB.NET er et objektorientert programmeringsspråk utviklet av Microsoft. Programmerere ofte foretrekker å bruke VB.NET for sin brukervennlighet og fleksibilitet. I noen få trinn kan du skrive VB.NET kode for å lese et Excel-regneark og vise innholdet.

Bruksanvisning

1 Åpne Microsoft Excel og skriv "Field" i "A1", "Felt 2" i "B1", "1" i "A2" og "2" i "B2". Lagre regnearket til "C: \" ". ExcelFileToRead.xlsx" som

2 Start Microsoft Visual Basic Express og klikk "New Project ..." på ruten til venstre på skjermen. Dobbeltklikk på "Console Application". Trykk "Ctrl" og "A" trykk "Delete" for å slette alle eksisterende kode.

3 Kopier og lim inn følgende kode til din "Module1.vb" modul:

Import Excel = Microsoft.Office.Interop.Excel

modul module1

Sub Main()

Dim ExcelApp Som Excel.Application

Dim ExcelWkBook Som Excel.Workbook

Dim ExcelWkSheet Som Excel.Worksheet

Dim XLArray (10) As String

ExcelApp = Ny Microsoft.Office.Interop.Excel.Application

ExcelWkBook = ExcelApp.Workbooks.Open ( "C: \ ExcelFileToRead.xlsx")

ExcelWkSheet = ExcelWkBook.Worksheets ( "Ark1")

XLArray (0) = ExcelWkSheet.Cells (1, 1) .Value

XLArray (1) = ExcelWkSheet.Cells (1, 2) .Value

XLArray (2) = ExcelWkSheet.Cells (2, 1) .Value

XLArray (3) = ExcelWkSheet.Cells (2, 2) .Value

MsgBox (XLArray (0))

MsgBox (XLArray (1))

MsgBox (XLArray (2))

MsgBox (XLArray (3))

ExcelWkBook.Close ()

ExcelApp.Quit ()

End Sub

End Module

4 Start programmet ved å trykke "F5".