V TEJTO ÚLOHE
Súhrn
Tento podrobný článok popisuje vytvoriť jednoduché aplikácie Visual Basic 6.0 a potom inovovať aplikáciu Visual Basic .NET alebo Visual Basic 2005 pomocou Sprievodcu inovácie programu Visual Basic, Visual Studio .NET alebo Visual Studio 2005.
Poznámka: Visual Basic .NET Upgrade sprievodca je súčasťou Visual Studio .NET Professional.
Poznámka: Visual Basic 2005 Upgrade sprievodca bol vylepšený v starších verziách programu Visual Basic.
Požiadavky
Tieto položky opísať odporúčaný hardvér, softvér, sieťovej infraštruktúry, schopnosti, znalosti a balíky service pack, musíte:
-
Microsoft Windows 2000 Professional (alebo Server) alebo Microsoft Windows XP Professional (alebo Server) .NET Framework nainštalovaný
-
Microsoft Visual Basic 6.0
-
Microsoft SQL Server 7.0 alebo novší databázu Northwind, oprávnenie a identifikácia používateľa a heslo
Predchádzajúce znalosti požadované:
-
Všeobecné vedomosti o vytvorenie aplikácie pomocou Visual Basic 6.0
Použitie Sprievodcu aktualizácie programu Visual Basic
Nasledovné kroky ukazujú, ako vytvoriť jednoduché aplikácie Visual Basic 6.0 a potom inovovať aplikáciu Visual Basic .NET alebo Visual Basic 2005 pomocou Sprievodcu inovácie programu Visual Basic, Visual Studio .NET alebo Visual Studio 2005:
-
V ponuke Štart , ukážte na položku programy, ukážte na Microsoft Visual Studio 6.0a kliknite na tlačidlo Microsoft Visual Basic 6.0.
-
V dialógovom okne Nový projekt kliknite Štandardné EXEa kliknite na tlačidlo Otvoriť.
-
Prvá forma Táto aplikácia používa ADO získať záznamov a zobrazí záznamov Microsoft hierarchický FlexGrid kontrolu. Do poľa názov v dialógovom okne vlastností pre Form1 typu
frmADO. -
Ak panel nie je otvorený, v ponuke Zobraziť kliknite na položku Nástroje.
-
Z panela s nástrojmi, umiestnite MSHFlexGrid formulára tak, aby plní väčšinu formulára. Ponechajte dostatok miesta na konci formulára umiestniť tlačidlo.
Poznámka: Ak nevidíte ikonu MSHFlexGrid nástroje, pridať do panela s nástrojmi. Kliknite pravým tlačidlom myši na paneli s nástrojmi a kliknite na tlačidlo súčasti. V dialógovom okne súčasti kliknutím vyberte Microsoft hierarchický FlexGrid Control 6.0 (OLEDB) v zozname dostupných súčastí a potom kliknite na tlačidlo OK. -
Z panela s nástrojmi, umiestnite CommandButton na formulár MSHFlexGrid. V poli Popis dialógového okna Vlastnosti zadajte OK.
-
Kliknite pravým tlačidlom myši na mADOa kliknite na tlačidlo Zobraziť kód. Pridajte nasledujúci kód, ktorý vytvára pripojenie databázy a záznamov, ktorý obsahuje všetky údaje z tabuľky produkty Northwind databáza.
Poznámka: V nasledujúcej ukážke kódu, musíte zmeniť Identifikácia používateľa =< meno_používateľa > a
heslo =< zložité heslo > správne hodnoty. Uistite sa, že identifikácia používateľa má príslušné povolenia na vykonanie tejto operácie na databázy.Private Sub Command1_Click() Unload Me
End Sub
Private Sub Form_Load()
Dim cn As Connection
Set cn = New Connection
cn.ConnectionString = "Provider=sqloledb;Data Source=localhost;database=northwind;user id=<username>;password=<strong password>"
cn.Open
Dim rs As Recordset
Set rs = New Recordset
rs.CursorLocation = adUseClient
rs.Open "select * from products", cn
Set MSHFlexGrid1.DataSource = rs
End Sub -
Stlačením klávesov CTRL + S uložte formulár. V ponuke súbor kliknite na položku Uložiť ako. V dialógovom okne Uložiť ako kliknite na položku Uložiť.
-
Project Explorer kliknite pravým tlačidlom myši na Project1, kliknite na tlačidlo Pridaťa kliknite na tlačidlo formulár. Kliknite na tlačidlo Otvoriť.
-
Do poľa názov v dialógovom okne Vlastnosti typu frmClipboard.
-
Z panela s nástrojmi, umiestnite textové pole formulára. Do textového poľa zadajte rýchla hnedá líška skočil lenivého psa.
-
Miesto CommandButton pod textového poľa. V poli Popis dialógového okna Vlastnosti zadajte kópia.
-
Miesto druhý CommandButton formulára. V poli Popis dialógového okna Vlastnosti zadajte Prilepiť.
-
Kliknite pravým tlačidlom myši frmClipboard, a kliknite na tlačidlo Zobraziť kód. Prilepte nasledujúci kód pre CommandButton kliknite na položku udalosti. Tento kód používa schránky objekt získať a prilepiť:
Private Sub Command1_Click() Clipboard.SetText Text1.SelText
End Sub
Private Sub Command2_Click()
Text1.SelText = Clipboard.GetText
End Sub -
Stlačením klávesov CTRL + S uložte formulár.
-
Posledná formulár je hlavný formulár aplikácie. Project Explorer kliknite pravým tlačidlom myši na Project1 tlačidlo, kliknite na formulára kliknite na tlačidlo Otvoriť.
-
Do poľa názov v dialógovom okne Vlastnosti typu frmMain.
-
Z panela s nástrojmi, umiestnite CommandButton na frmMain formulár. V poli Popis dialógového okna Vlastnosti zadajte ADO.
-
Miesto druhý CommandButton formulára. V poli Popis dialógového okna Vlastnosti zadajte schránky.
-
Kliknite pravým tlačidlom myši na frmMaina kliknite na tlačidlo Zobraziť kód. Prilepte nasledujúci kód pre CommandButton kliknite na udalosti na zobrazenie ďalších foriem:
Private Sub Command1_Click() frmADO.Show
End Sub
Private Sub Command2_Click()
frmClipboard.Show
End Sub -
Stlačením klávesov CTRL + S uložte formulár.
-
V roztoku Prieskumník kliknite pravým tlačidlom myši na Project1a kliknite na tlačidlo Project1 vlastnosti. V poli Startup objektu kliknite frmMaina kliknite na tlačidlo OK.
-
Pridať odkaz na ADO súčasti, na projekt ponuky, kliknite na tlačidlo Odkazy. V zozname dostupné odkazy, kliknutím vyberte Microsoft ActiveX Data objektov knižnica (robiť žiadne verzia 2.0 alebo novšia). Kliknite na tlačidlo OK.
-
Zostavenie projektu v ponuke súbor kliknite na položku Sa Project1.exe. V dialógovom okne Kontrola projektu , kliknite na tlačidlo OK (Akceptujte predvolený názov súboru).
-
Stlačením klávesu F5 na spustenie aplikácie v režime ladenia.
Poznámka: nie je potrebné overiť, či staršie aplikácie Visual Basic sa spustí bez problémov, pred inováciou. -
Zatvorte prostredie jazyka Visual Basic. Pri zobrazení výzvy na uloženie zmien do projektu, kliknite na tlačidlo Áno. Použiť predvolený názov a uložte projekt.
-
V ponuke Štart , ukážte na položku programy, ukážte na Microsoft Visual Studio.NETa kliknite na tlačidlo Microsoft Visual Studio.NET.
-
Na úvodnej stránke, kliknite na položku Otvoriť projekt. Vyhľadajte priečinok obsahujúci súbor projektu programu Visual Basic 6.0, že ste práve vytvorili (obyčajne C:\Program Files\Microsoft Visual Studio\VB98). Kliknite na položku Project1.vdpa kliknite na tlačidlo Otvoriť.
-
Visual Studio .NET zistí, že toto je staršie projektu programu Visual Basic a spustí sprievodcu inovácie programu Visual Basic. Sprievodca zobrazí popis každé Nezabúdajte kroky v nasledujúcom poradí:
-
Vytvorenie nového projektu, do ktorého je inovovaná existujúci projekt.
-
Kopírovanie súborov a triedy súbory do nového projektu.
-
Poskytovať aktualizácie obsahujúce súčasti projektu úspešne aktualizovaný a súčastí neinovovali úspešne.
-
-
Kliknite na tlačidlo ďalej cez jednotlivé kroky pred začatím procesu inovácie. Inovácia bude trvať približne 30-60 sekúnd.
-
Roztok Explorer, dvakrát kliknite na _UpgradeReport.htm. Táto zostava zobrazuje výsledky inovácie. Všimnite si, že všetky formuláre okrem frmClipboard upgrade bez problémov.
-
Rozbaľte frmClipboard.vb Zobraziť problémy. Clipboard.SetText a GetText neinovovali správne. Kliknite na prepojenia Popis Zobraziť ako opraviť problémy.
-
V programe Prieskumník riešení vedomie, že všetky formy uchovávať ich pôvodné názvy, ale príponu súboru sa zmení z .frm na. vb.
-
Rozbaľte Odkazy. Všimnite si, že odkazy na všetky súčasti, ktoré sú potrebné na používanie starších verzií programu Visual Basic a ADO súčasti sa automaticky.
-
Kliknite pravým tlačidlom myši na niektorú z foriem a kliknite na tlačidlo Zobraziť kód. Rozbaľte oblasť Podpory inovácie . Táto oblasť zobrazuje Visual Studio .NET alebo Visual Studio 2005 konfigurácie rôznych objektov a premenných na podporu inovovaný kód.
-
V roztoku Prieskumník kliknite pravým tlačidlom myši na frmClipboard.vba kliknite na tlačidlo Zobraziť kód. Všimnite si, že komentáre umiestnené pred riadky nie.
-
Zmena Command1_Click a Command2_Click udalostí nasledovnému:
Private Sub Command1_Click(ByVal eventSender As System.Object, _ ByVal eventArgs As System.EventArgs) Handles Command1.Click
Clipboard.SetDataObject(Text1.Text)
End Sub
Private Sub Command2_Click(ByVal eventSender As System.Object, _
ByVal eventArgs As System.EventArgs) Handles Command2.Click
Text1.SelectedText = _
Clipboard.GetDataObject().GetData(GetType(System.String))
End Sub
Kompletný kód výpis
Complete Code Listing (frmADO.frm)
Private Sub Command1_Click() Unload Me
End Sub
Private Sub Form_Load()
Dim cn As Connection
Set cn = New Connection
cn.ConnectionString = "Provider=sqloledb;Data Source=localhost;database=northwind;user id=<username>;password=<strong password>"
cn.Open
Dim rs As Recordset
Set rs = New Recordset
rs.CursorLocation = adUseClient
rs.Open "select * from products", cn
Set MSHFlexGrid1.DataSource = rs
End Sub
Complete Code Listing (frmClipboard.frm)
Private Sub Command1_Click() Clipboard.SetText Text1.SelText
End Sub
Private Sub Command2_Click()
Text1.SelText = Clipboard.GetText
End Sub
Complete Code Listing (frmMain.frm)
Private Sub Command1_Click()
frmADO.Show
End Sub
Private Sub Command2_Click()
frmClipboard.Show
End Sub
Skontrolujte, či aplikácia funguje
-
Stlačením klávesu F5 na spustenie aplikácie.
-
Výzva na uloženie projektu, kliknite na tlačidlo OK.
-
Form1, kliknite na ADO. Formulár sa obsahuje údaje v mriežke. Zatvorte tento formulár.
-
V Form1, kliknite na tlačidlo Schránka.
-
Kliknite na položku Kopírovať.
-
Umiestnite kurzor do textového poľa na začiatku textu a kliknite na tlačidlo Prilepiť. Zobrazia sa prilepený text.
Riešenie problémov
Visual Basic .NET je zásadný posun v predchádzajúcich verziách programu Visual Basic. Mnohé projekty, niektoré rozsiahlym prípravou je vhodné pred inováciou. Pozrite si nasledujúci dokument informácie, ktoré vám môžu pomôcť ľahšie upgrade:
ODKAZY
Ďalšie informácie nájdete v nasledujúcich článkoch Microsoft Developer Network (MSDN):