Hur man skriver flera rader till Excel Använda Vb.Net

Skriva flera rader till Microsoft Excel från Visual Basic.NET program kan ge användarna fler verktyg för att manipulera sina data med Excel . I VB , kan du använda Microsoft Excel Object Library för att skapa ett nytt kalkylblad och skriva data till den från din ansökan . Använda Excel för att exportera dina data är mycket effektiv när data behöver analyseras . Försök inte att skriva kod i din ansökan att imitera verktygen i Excel och använda Excel istället . Instruktioner
1

Launch Microsoft Visual Studio , klicka på " Nytt projekt " från den vänstra rutan på din datorskärm och expandera " Visual Basic " under " Installerade mallar . " Klicka på " Windows " och dubbelklicka på " Windows Forms Application " från mitten av dialogrutan för att skapa ett nytt projekt .
2

Dubbelklicka på " knappen " på " Toolbox " rutan för att lägga till knappen till formuläret . Dubbelklicka på knappen för att skapa en click-händelse för det .
3

Klicka på " Project " -menyn och välj " Properties . " Klicka " Hänvisar till " och välj sedan " Lägg till ". Välj " COM " och klicka på " Microsoft Excel Bibliotek number> Object . " Klicka på " OK . "
4

Skriv följande kod i den allra första raden i modulen för att importera Microsoft Office namespace :

Imports Microsoft.Office.Interop

5

Lägg till följande kod inuti knappen händelsen click för att skapa en ny Excel-ark :

Dim xlsxA som ny Excel.Application

xlsxA.Visible = Sant

Dim xlsxWks Som Excel.Workbooks = xlsxA.Workbooks

Dim xlsxWk Som Excel.Workbook = xlsxWks.Add

Dim xlsxShts Som Excel.Sheets = xlsxWk.Worksheets

Dim xlsxSht som Excel.Worksheet = xlsxShts ( " Blad1 " )
6

Lägg till flera rader i kalkylbladet genom att lägga till följande kod :

xlsxSht.Range ( " A1 " ) . Value = " Rad 1 med data "

xlsxSht.Range ( " A2 " ) . Value = " Rad 2 med data "

xlsxSht.Range ( " A3 " ) . Value = " Row 3 med data "
7

Spara kalkylbladet :

xlsxSht.SaveAs ( " C : \\ Temp \\ ExcelFile.xlsx " )
8

Press " F5 " för att köra programmet och klicka på " Button1 . " Addera