Visual Basic 6 ( VB6 ) hat ein Tool , Code Advisor für Visual Basic 6.0 , die vorhandenen Code prüft die Einhaltung von Best Practices . Der Berater informiert Sie über Probleme und kann einige Zeit in ein Upgrade auf eine der Visual Basic 2005 oder Visual Basic.NET anderen Versionen zu speichern. Es kann nicht fangen alle Probleme sollten aber ihre Zahl zu reduzieren. Im Visual Studio 2005 und Visual Studio 2008 , löst ein Upgrade Wizard , wenn Sie ein Programm in Visual Basic 6 geschrieben zu öffnen . Anleitung
1
herunterladen und installieren Sie die kostenlose Code Advisor für Visual Basic 6.0 (siehe den ersten Link Ressourcen ) . Öffnen Sie Visual Basic 6 und erstellen Sie ein neues Projekt, um die Standard.EXE Advisor demonstrieren.
2
auf der Textbox-Steuerelement , ein kleines quadratisches Symbol mit Kleinbuchstaben "ab" in der ToolBox Doppelklick auf der linken Seite des Bildschirms, um ein Textfeld auf dem Formular platzieren. Auf dem CommandButton Doppelklicken Sie ein kleines Rechteck unter dem TextBox-Steuerelement , um diese zum Formular hinzufügen .
3
Klicken Sie auf das Feld Text1 jetzt auf dem Formular , um die Eigenschaften im View rechten Feld des Bildschirms. Die Text-Eigenschaft wird hervorgehoben. Doppelklicken Sie darauf , um die tatsächliche Eigenschaft liest " Text1 " markieren und löschen.
4
auf der " Command1 " -Taste, um das Codefenster zu öffnen Doppelklick . Geben Sie den folgenden Code, und drücken Sie dann die "F5" , um es auszuführen . Tun Sie dies mehrmals ausprobieren jede Antwort , wenn Bestätigung asked.Option ExplicitPrivate Sub Command1_Click () Dim yourname , Antwort als Stringyourname = InputBox (" Wie ist dein Name ?") Text1.Text = " Sie haben gesagt, Ihr Name war " & yournameresponse = MsgBox ( "Ist das richtig " , vbYesNoCancel ) Wenn response = vbYes ThenMsgBox ( "Gut "). EndElseIf response = vbNo ThenText1.Text = " Sorry, bitte versuchen Sie es erneut ? " Else : Text1.Text = " geben Sie nicht up! "End Sub IfEnd
5
löschen oder legen einen Apostroph vor dem " Option Explicit "-Zeile. Ändern Sie das letzte Wort der Zeile " Dim yourname , Response As String " zu " verdoppeln." Drücken Sie auf " F5" , und notieren Sie das Programm noch funktioniert. Klicken Sie auf " Add- Ins" auf der obersten Menüebene , dann " Code Advisor " und wählen Sie "Add FixIts . " Die Advisor identifiziert zwei Probleme, die durch das Hinzufügen dieser Zeilen in dem Problem Stellung :
' FIXIT : Use Option Explicit vermeiden implizit Erstellung von Variablen des Typs Variant'FIXIT : Declare ' yourname ' mit einem früh gebundene Datentyp
löschen Sie die
FIXIT Linien . Speichern Sie das Projekt und beenden Sie Visual Basic 6 .
6
Öffnen Sie eine neuere Version von Visual Basic. Klicken Sie auf " Datei" und " Projekt öffnen . " Suchen Sie den Visual Basic -Datei Projekt, das Sie in Schritt 4 gespeichert , die eine " vbp " Erweiterung haben wird , und doppelklicken Sie darauf . Der Upgrade-Assistent öffnet sich mit einigen vorläufigen Anweisungen. Klicken Sie auf " Weiter" und wählen Sie die Art des Projekts , in der Regel eine "EXE "-Version. Klicken Sie auf " Weiter" , wählen Sie , wo die neue Version zu speichern und stimmen in einen neuen Ordner , falls erforderlich. Weiter klicken Sie auf " Weiter", bis der Assistent beginnt . Wenn es fertig ist , werden alle Problembereiche, die behoben werden, bevor das Programm kompatibel ist , müssen Sie mit Upgrade- Warnungen identifiziert werden.