| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringssprog
  • Delphi programmering
  • Java programmering
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl programmering
  • Python Programming
  • Ruby Programming
  • Visual Basics Programmering
  •  
    Computer Viden >> Programmering >> Visual Basics Programmering >> Content
    Sådan Konverter tabelværdier til XLS format i VB.NET
    A " DataTable " er en VB.NET objekt , der lader dig vise data i kolonner og rækker til dine læsere. Du kan eksportere DataTable oplysninger til et Excel-regneark række- by- rækken. VB.NET indeholder et Excel -bibliotek , så du behøver ikke at installere tredjeparts applikationer til at skabe regnearket. Filen gemmes på serveren med en webapplikation eller på din brugers harddisk med en desktop applikation . Instruktioner
    1

    Klik på Windows " Start" knappen og vælg " Alle programmer". Klik på " Microsoft. NET Framework " og derefter klikke på " Visual Studio " for at åbne VB.NET programmeringssoftware .
    2

    Klik på " Filer" menupunktet , og vælg "Åbn Project. " Dobbeltklik på VB.NET projektfil at indlæse koden. I højre " Solution Explorer " panel , skal du højreklikke på den fil, du vil bruge til at eksportere data og vælg "Vis kode".
    3

    Tilføj systemet bibliotek, der indeholder Excel funktioner til toppen af ​​filen :

    Import Excel = Microsoft.Office.Interop.Excel
    4

    Opret et nyt regneark for at indlæse Excel-funktioner og skabe et nyt navn regneark " ordrer " :

    app = new Excel.Application ()

    sheet = ( Excel.Worksheet ) app.ActiveSheet

    sheet.Name =" ordrer "
    < br > 5

    gentage gennem hver tabelrække og skrive det til regnearket : Hej

    Dim count As Integer = 1

    hver række Som DataRow i table.Rows
    < p > count + = 1

    j As Integer = 1 til table.Columns.Count
    p Hvis count = 2 så

    sheet.Cells (1, j ) = bord. kolonner ( j - 1) . FeltNavn

    End If

    sheet.Cells ( count , j ) = row.Item ( j - 1) . ToString

    Next < br >

    Næste
    6

    Gem ændringerne til " orders.xls " fil og lukker projektmappen : Hej

    app.SaveAs ( " orders.xls " )

    app.Close ()

    Forrige :

    næste :
      Relaterede artikler
    ·Sådan Konverter en binær fil i en Byte String i Visua…
    ·Hvad er en Overflow Fejl i Vb.net 
    ·Sådan oprettes en resolution Uafhængig Ramme i VB.NET…
    ·Sådan Erklær et array i FoxPro Programmering 
    ·Sådan tilføjes et billede til et billede i VB6 
    ·Hvordan man laver et værktøj i Visual Basic 
    ·Hvordan laver Pictures Scroll 
    ·Hvordan man kan udvikle Mobile Applications Brug af Mic…
    ·Mid funktion i Visual Basic 
    ·Sådan Detect Tab Indtast ComboBox i VBA 
      Anbefalede Artikler
    ·Sådan tilføjes kolonner til en DataTable i C # 
    ·Hvordan at slippe af numre i COBOL 
    ·Hvordan man laver en proxy i Java 
    ·Sådan ændres Element Margins Brug HTML programmering 
    ·Hvordan læser jeg linje for linje med Visual Basic 
    ·Statiske Arrays i funktioner i VBA 
    ·Hvordan laver VB Debugger Go Into Code 
    ·Visual Basic 2005 Express Edition Tutorial 
    ·MySQL Basics for Visual Learners 
    ·Typer af Data 
    Copyright © Computer Viden http://www.computerdk.com