Ako používať súčasť webové hárok s programom Visual Basic

Preklady článku Preklady článku
ID článku: 235883
Rozbaliť všetko | Zbaliť všetko

Na tejto stránke

SUHRN

Ak chcete použiť hárok alebo výpočet motora v vaše vlastné Visual Basic riešenie, môžete použiť hárok ovládania súčasťou Microsoft Office Web Components. Tento článok sa zaoberá vložte hárok ako ovládací prvok vo formulári, Visual Basic a osídlit hárok s údajmi.

DALSIE INFORMACIE

Súčasti Office Web Components môžete pridať do formulára v programe Visual Basic rovnakým spôsobom pridáte iného ovládacieho prvku ActiveX. V Hárok ovládania súčasťou súčasti Office Web Components je robustnejšie možnosť ako Údajová mriežka kontrola, že lode s programom Visual Basic. Pomocou tabuľky údajov zobrazí formátované údaje, prepočítať vzorce a umožniť používateľovi interaktivity.

DÔLEŽITÉ: Chcete zobraziť a pracovať s akoukoľvek Office Web Components, musíte ich nainštalovaný na vašom počítači. Súčasti sa nainštalujú s programom Microsoft Office 2000 alebo, ak má vaša spoločnosť licenciu na lokalitu Office 2000, komponenty si môžete stiahnuť z intranetu. Používatelia musia mať tieto súčasti nainštalované ako aj a musia byť pokryté licenciu na balík programov Office 2000. Vás a vaše užívateľov musia použiť program Microsoft Internet Explorer verzia 4.01 alebo novšia.

Kroky na vytvorenie vzorky projektu

  1. Vytvorenie nového štandardného EXE projektu v programe Visual Basic. Form1 sa vytvorí na základe predvoleného nastavenia.
  2. Pridať odkaz na Microsoft Office Web komponentov 9.0.
  3. Pridať ovládací prvok tabuľky z panela s nástrojmi programu Visual Basic do formulára.
  4. V Hárok kontroly môžu byť zobrazené a použitý ako pracovného hárka, alebo môže byť skrytý a používa ako výpočet motora pre viditeľné ovládacích prvkov na stránke.
Práca s Hárok kontrola v jazyku Visual Basic je takmer identické v práci s hárkom programu Excel. Metód a vlastností použijete manipulovať súčasť hárok sú podobné tým, ktoré by ste použili, keď automatizácia programu Excel.

Populating ovládací prvok tabuľky

Môžete pridať údaje Hárok kontrolu jedným z nasledujúcich spôsobov:
  • Zadajte údaje priamo do mriežky.
  • Skopírujte a prilepte údaje z hárka programu Excel, textový súbor alebo dokument programu Word.
  • Importovať údaje z textového súboru alebo na webovú stránku. Pre viac informácií pozri tému LoadText metódy a HTMLURL vlastníctva tému v Pomocníkovi online.
  • Napísať kód na vyplnenie hárka s údajmi.
Všimnite si, že neexistuje spôsob, ako vytvoriť väzbu Hárok kontroly údajov priamo;

Nasledujúci postup sa vyplní a formáty Hárok kontrolu údajov zo vzorovej databáze Northwind (NWind.mdb):
Sub GetNwindData()

    Dim rstEmployees As Object
    Dim cnn As String
    Dim strSQL As String
    Dim fldCount As Integer
    Dim intIRow As Integer
    Dim intICol As Integer
    Dim varData As Variant

    'Create recordset and fill with records from Northwind sample database.
    Set rstEmployees = CreateObject("ADODB.Recordset")
    cnn = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\Program Files\Microsoft Visual Studio\VB98\nwind.mdb"
    strSQL = "SELECT FirstName, LastName, Title, Extension FROM Employees ORDER BY LastName"
    rstEmployees.Open strSQL, cnn, 3 ' adOpenStatic = 3
    
    'Clear any existing values from the spreadsheet control.
    Spreadsheet1.ActiveSheet.Cells(1, 1).Select
    Spreadsheet1.ActiveSheet.UsedRange.Clear

    'Add the field names as column headers.
    For fldCount = 0 To rstEmployees.Fields.Count - 1
        intIRow = intIRow + 1
        Spreadsheet1.ActiveSheet.Cells(1, intIRow).Value = rstEmployees.Fields(fldCount).Name
    Next

    'Fill the control with data from the database.
    Dim iNumCols As Integer
    Dim iNumRows As Integer
    
    iNumCols = rstEmployees.Fields.Count
    iNumRows = rstEmployees.Recordcount
    varData = rstEmployees.GetRows(iNumRows)
    
    For intIRow = 1 To iNumRows
        For intICol = 1 To iNumCols
            Spreadsheet1.ActiveSheet.Cells(intIRow + 1, intICol).Value = varData(intICol - 1, intIRow - 1)
        Next
    Next

    'Format the headers in row 1 with a Bold Font that is 11 points.
    With Spreadsheet1.ActiveSheet.Range(Spreadsheet1.Cells(1, 1),
Spreadsheet1.ActiveSheet.Cells(1, iNumCols)).Font
        .Bold = True
        .Size = 11
    End With
    
    'AutoFit the columns and make all text left-aligned.
    With Spreadsheet1.ActiveSheet.Range(Spreadsheet1.Cells(1, 1),
Spreadsheet1.ActiveSheet.Cells(iNumRows + 1, iNumCols))
        .AutoFitColumns
        .HAlignment = ssHAlignLeft
    End With

End Sub
				


Všimnite si, že ovládací prvok tabuľky nie je zošit a obsahuje len jeden hárok. Vlastnosť ActiveSheet odkazuje tento jeden hárok.

Získanie pomoci

Keď vytvoríte odkaz na súčasti Office Web Components knižnice, Pomocníka môžete získať prostredníctvom object browser alebo z Všeobecné na karte hárka vlastností Toolbox. Môžete tiež vyhľadajte a dvakrát kliknite na súbor Pomocníka Msowcvba.chm. Chcete zobraziť Pomocníka pre konkrétne kľúčové slovo, zvýrazniť kľúčové slovo a stlačte F1 kľúč. Informácie o vytváraní odkazov a používaní objekt model Pomocníka, nájdete v Pomocníkovi programu Visual Basic alebo Visual Basic for Applications.

Ovládací prvok tabuľky môžete naviazať ovládací prvok grafu. Ďalšie informácie o ovládací prvok grafu, kliknite na nasledujúce číslo článku databázy Microsoft Knowledge Base:
235885 Ako používať webová súčasť graf S VB

ODKAZY

Ďalšie informácie o súčasti Office Web Components, pozri kapitoly 12, "Pomocou webových technológií," v balíku Microsoft Office 2000/Visual Basic Programmer's Guide.

Vlastnosti

ID článku: 235883 - Posledná kontrola: 23. októbra 2011 - Revízia: 3.0
Kľúčové slová: 
kbhowto kbofficewebspread kbmt KB235883 KbMtsk
Strojovo preložené
DÔLEŽITÉ: Tento článok bol preložený pomocou softvéru na strojový preklad od spoločnosti Microsoft, nie prekladateľom. Spoločnosť Microsoft ponúka články preložené prekladateľmi aj strojovo preložené články, vďaka čomu máte možnosť prístupu ku všetkým článkom databázy Knowledge Base vo svojom jazyku. Strojovo preložený článok však nie je vždy perfektný. Môže obsahovať chyby týkajúce sa slovnej zásoby, syntaxe alebo gramatiky, podobne ako cudzinec môže robiť chyby, keď rozpráva vašim jazykom. Spoločnosť Microsoft nenesie zodpovednosť za akékoľvek nepresnosti, chyby alebo škody spôsobené akýmkoľvek nepresným prekladom obsahu alebo jeho použitím zo strany zákazníkov. Spoločnosť Microsoft softvér na strojový preklad pravidelne aktualizuje.
Pokiaľ chcete vidieť anglickú verziu článku, kliknite sem:235883
Upozornenie na neaktuálny obsah článku databázy KB
Tento článok obsahuje informácie o produktoch, pre ktoré spoločnosť Microsoft už neposkytuje technickú podporu. Z tohto dôvodu je tento článok publikovaný ako nezmenený a už nebude aktualizovaný.

Odošlite odozvu

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com