Hur man överföra data från ett träd View Node till Excel

November 2

Hur man överföra data från ett träd View Node till Excel


Att kunna exportera trädvy oden information till Excel kan göra din ansökan mer dynamisk. I Visual Basic, kan du få text från en utvald nod i ett trädvyn genom att använda "SelectedNode" egendom. Den här egenskapen representerar den valda noden i trädvyn som du kan använda för att få data i noden. Använd Microsoft Excel objektbiblioteket för att skapa en ny arbetsbok och exportera data till en av sina kalkylblad.

Instruktioner

1 Starta Microsoft Visual Basic Express och välj "Nytt projekt ..." från den vänstra rutan på skärmen. Klicka på "Visual Basic" under "Installerade mallar" och dubbelklicka på "Windows Forms program."

2 Klicka på "Verktyg" rutan och dubbelklicka på "Treeview" för att lägga en ny "Treeview" kontroll i formuläret. Dubbelklicka på "Button" för att lägga en ny knapp för att överföra data från "Treeview" kontroll.

3 Klicka på menyn "Project" och välj "<Projektnamn> Egenskaper." Klicka på "Referenser" och välj sedan "Lägg till." Välj "COM" och klicka på "Microsoft Excel <versionsnummer> objektbiblioteket." Klicka på "OK."

4 Dubbelklicka på formuläret för att skapa ett formulär last händelse och lägg till följande kod för att lägga till tre noder trädvyn:

Me.TreeView1.Nodes.Add ( "node1")

Me.TreeView1.Nodes.Add ( "Node2")

Me.TreeView1.Nodes.Add ( "Node3")

5 Dubbelklicka på "Button1" för att skapa en click-händelse för knappen och lägg till följande kod för att skapa en ny Excel-fil och lägga till den valda noden texten "A1":

Dim xlTV Som New Excel.Application

xlTV.Visible = True

Dim xlTVwks As Excel.Workbooks = xlTV.Workbooks

Dim xlTVwk Som Excel.Workbook = xlTVwks.Add

Dim xlTVshts As Excel.Sheets = xlTVwk.Worksheets

Dim xlTVsht Som Excel.Worksheet = xlTVshts ( "Blad1")

xlTVsht.Range ( "A1"). Value = TreeView1.SelectedNode.Text.ToString

xlTVsht.SaveAs ( "C: \ dataFromTreeView.xlsx")

6 Tryck på "F5" för att köra programmet och välj en nod i trädvyn. Klicka på "Button1" för att skapa Excel-fil.


        

Välkommen till dig för att skicka en kommentar:

            
            
            
            

© 2019 Astrixsoft.com | Contact us: webmaster# astrixsoft.com