Visual Basic 6 ( VB6 ) har ett verktyg , Code Advisor för Visual Basic 6.0 , som kontrollerar befintlig kod för anpassning till bästa praxis . Den Advisor varnar dig för problem och kan spara lite tid i en uppgradering till en av Visual Basic 2005 eller andra Visual Basic.NET versioner . Det kan inte fånga alla problem men bör minska deras antal . Inom Visual Studio 2005 och Visual Studio 2008 , utlöser en guide för uppgradering när du försöker öppna ett program skrivet i Visual Basic 6 . Instruktioner
1
Ladda ner och installera den kostnadsfria Code Advisor för Visual Basic 6.0 ( se första Resources länken ) . Öppna Visual Basic 6 och skapa ett nytt Standard.EXE projekt för att demonstrera Advisor .
2
Dubbelklicka på textrutan kontroll , en liten fyrkantig ikon med gemener " ab " i verktygslådan panelen till vänster på skärmen för att placera en textruta i formuläret . Dubbelklicka på CommandButton , en liten rektangel i textrutan kontroll , för att lägga till detta i formuläret .
3
Klicka på Text1 rutan nu på formuläret för att visa egenskaperna i höger panel av skärmen. Egenskapen text markeras . Dubbelklicka på den för att markera den aktuella fastigheten läsning " Text1 " och radera den .
4
Dubbelklicka på " Command1 " -knappen för att öppna koden fönstret . Skriv följande kod och tryck på " F5 " för att köra den . Gör detta flera gånger för att prova varje svar när bekräftelsen är asked.Option ExplicitPrivate Sub Command1_Click ( ) Dim yourname , svar Som Stringyourname = InputBox ( " Vad heter du ? " ) Text1.Text = " Du sa att du hette " & yournameresponse = MsgBox ( " ? stämmer " , vbYesNoCancel ) Om svaret = vbYes ThenMsgBox ( " Fine . " ) EndElseIf svar = vbNo ThenText1.Text = " Ledsen , vänligen försök igen ? " Else : Text1.Text = " ge inte up ! " End IfEnd Sub
5
bort eller placera en apostrof framför " Option Explicit " linje . Ändra det sista ordet i raden läsa " Dim yourname , svar As String " till " dubbel". Tryck " F5 " och notera programmet fortfarande fungerar . Klicka på " Add- Ins " på den översta nivån menyn , sedan " Code Advisor " och välj " Lägg FixIts . " Den Advisor identifierar två problem genom att lägga till dessa rader i problemet ställning :
' FIXIT : Använd Option Explicit att undvika implicit skapa variabler av typen Variant'FIXIT : Declare " yourname " med en tidigt bunden datatyp
Radera FIXIT linjer . Spara projektet och avsluta Visual Basic 6 .
6
Öppna en nyare version av Visual Basic . Klicka på " File " och " Öppna projekt . " Leta reda på Visual Basic filen projekt du sparade i steg 4 , vilket kommer att ha en " vbp " förlängning , och dubbelklicka på den . Den Upgrade Wizard öppnas med vissa preliminära instruktioner . Klicka på "Nästa " och välj den typ av projekt , oftast en " EXE " version . Klicka på "Nästa " igen , välj var du vill spara den nya versionen och samtycker till en ny mapp om det behövs . Fortsätt att klicka " Next " tills guiden startar . När den är klar kommer alla problemområden som måste åtgärdas innan programmet är kompatibelt identifieras med Upgrade Varningar .
