Visual Basic 6 ( VB6 ) heeft een hulpmiddel , Code Adviseur voor Visual Basic 6.0 , dat de bestaande code controleert op naleving van best practices . De Adviseur waarschuwt u voor problemen en kan wat tijd te besparen in een upgrade naar een van de Visual Basic 2005 of Visual Basic.NET andere versies . Het mag niet vangen alle problemen, maar moeten hun aantal te verminderen . Binnen Visual Studio 2005 en Visual Studio 2008 , een Upgrade Wizard triggers wanneer u probeert een programma geschreven in Visual Basic 6 openen . Instructies Download en installeer 1 van de gratis code Adviseur voor Visual Basic 6.0 ( zie de eerste link Resources ) . Open Visual Basic 6 en maak een nieuw Standard.exe project om de adviseur aan te tonen . Kopen van 2 Dubbelklik op het tekstvak controle , een klein vierkant pictogram met kleine letters " ab " in de ToolBox paneel aan de linkerkant van het scherm om een tekstvak te plaatsen op het formulier . Dubbelklik op de CommandButton , een kleine rechthoek onder deTextBoxbesturingselement , om deze aan het formulier toe te voegen . Klik 3 op de doos Text1 nu op het formulier om de eigenschappen te bekijken in de rechter paneel van het scherm . DeTeksteigenschap is gemarkeerd . Dubbelklik op het bestand om de werkelijke eigendom lezen " Text1 " te selecteren en te verwijderen . 4 Dubbelklik op de knop " Command1 " om het venster code te openen . Typ de volgende code in en druk op " F5 " om het uit te voeren . Doe dit een paar keer uit te proberen elke reactie als bevestiging is asked.Option ExplicitPrivate Sub Command1_Click ( ) Dim yourname , respons Zoals Stringyourname = InputBox ( "Wat is je naam ? ' ) Text1.Text = ' Je zei dat je naam was " & yournameresponse = MsgBox ( "Is dat juist " , vbYesNoCancel ) Als reactie = vbYes ThenMsgBox ( " Fine . " ) EndElseIf response = vbNo ThenText1.Text = " Sorry , probeer opnieuw aub? " Else : Text1.Text = " geef niet op up ! "End Sub IfEnd 5 Verwijder of plaats een apostrof in de voorkant van de " Option Explicit " lijn . Verander het laatste woord van de regel lezen " Dim yourname , respons als Koord " naar " Double . " Druk op " F5 " en noteer het programma werkt nog steeds . Klik op " Add- Ins " op het hoofdmenu , vervolgens " Code Advisor " en selecteer " FixIts toevoegen . " De adviseur identificeert twee problemen door het toevoegen van deze lijnen in het probleem positie : ' FIXIT : Gebruik Option Explicit om te voorkomen dat impliciet het creëren van variabelen van het type Variant'FIXIT : Declare ' yourname ' met een vroege - gebonden data type < br > Verwijder de FIXIT lijnen . Sla het project op en sluit Visual Basic 6 . 6 Open een nieuwere versie van Visual Basic . Klik op " File " en "Open Project . " Zoek het Visual Basic -bestand project dat u in stap 4 hebt opgeslagen , die een " vbp " extensie zal hebben , en dubbelklik erop. De wizard Upgrade opent met een aantal voorlopige instructies . Klik op " Next " en kies het type project , meestal een " EXE " -versie . Klik op " Next" knop , selecteer waar u de nieuwe versie te slaan en ga akkoord met een nieuwe map indien nodig. Blijven klikken op "Volgende" totdat de Wizard begint . Wanneer het klaar is , zullen alle knelpunten die moeten worden opgelost voordat het programma compatibel worden geïdentificeerd met Upgrade Waarschuwingen .
|