|
Visual Basic 6 ( VB6 ) dispose d'un outil , Code Advisor pour Visual Basic 6.0 , qui vérifie le code existant pour le respect des meilleures pratiques . Le conseiller vous avertit de problèmes et peut faire gagner du temps à une mise à niveau à l'un des Visual Basic 2005 ou d'autres versions Visual Basic.NET . Il ne peut pas attraper tous les problèmes, mais devrait permettre de réduire leur nombre. Dans Visual Studio 2005 et Visual Studio 2008, un assistant de mise à niveau se déclenche lorsque vous essayez d'ouvrir un programme écrit en Visual Basic 6 . Instructions
1 télécharger et installer le Gestionnaire de code libre pour Visual Basic 6.0 (voir le premier lien Ressources ) . Ouvrez Visual Basic 6 et créer un nouveau projet de Standard.EXE pour démontrer le conseiller .
2 Double -cliquez sur le contrôle zone de texte , une petite icône carré avec des lettres minuscules «AB» dans la boîte à outils panneau sur la gauche de l'écran pour placer une zone de texte sur le formulaire. Double -cliquez sur le bouton de commande , un petit rectangle sous le contrôle de zone de texte , l'ajouter à la forme .
3 Cliquez sur la zone de Texte1 maintenant sur le formulaire pour afficher les propriétés de la panneau de droite de l'écran. La propriété Text est mis en évidence . Double-cliquez dessus pour mettre en évidence la propriété réelle de lecture " Text1 " et supprimez-le .
4 Double -cliquez sur le bouton " Command1 " pour ouvrir la fenêtre de code . Tapez le code suivant , puis appuyez sur la touche "F5 " pour l'exécuter. Faites ceci plusieurs fois pour essayer chaque réponse lorsque la confirmation est asked.Option ExplicitPrivate Sub Command1_Click () de votrenom Dim, réponse Comme Stringyourname = InputBox (" Quel est votre nom ? " ) Text1.Text = " Vous dites que votre nom était" & yournameresponse = MsgBox (" ? Est-ce exact " , vbYesNoCancel ) Si la réponse = vbYes ThenMsgBox ( "Très bien. " ) EndElseIf réponse = vbNo ThenText1.Text = "Désolé , veuillez réessayer ? " Else : = Text1.Text " ne donnez pas up! "End Sub IfEnd
5 supprimer ou placer une apostrophe devant la ligne" Option Explicit " . Changez le dernier mot de la ligne de lecture " votrenom Dim, réponse As String " à " Double ". Appuyez sur "F5" et noter le programme fonctionne toujours. Cliquez sur " Add- Ins » dans le menu de niveau supérieur, puis "Code Advisor " et sélectionnez " Ajouter Fixits . " Le conseiller identifie deux problèmes en ajoutant ces lignes dans la position de problème :
' FIXIT : Utilisez Option Explicit pour éviter de créer implicitement des variables de type Variant'FIXIT : Declare ' votrenom ' avec un type de données à liaison anticipée < br > supprimer les lignes FIXIT . Enregistrez le projet et quittez Visual Basic 6 .
6 Ouvrez une nouvelle version de Visual Basic. Cliquez sur " Fichier" et " Ouvrir un projet. " Localisez le projet Visual Basic fichier que vous avez enregistré à l'étape 4 , ce qui aura une extension " VBP " , et double- cliquez dessus. L'assistant de mise à niveau s'ouvre avec des instructions préliminaires . Cliquez sur "Suivant " et choisissez le type de projet , le plus souvent une version "exe" . Cliquez sur " Suivant" , sélectionnez l'endroit où enregistrer la nouvelle version et convenir d'un nouveau dossier si nécessaire. Continuez à cliquer sur "Suivant" jusqu'à ce que l'Assistant commence. Quand il a fini, tous les problèmes qui doivent être résolus avant que le programme est compatible seront identifiés des avertissements de mise à niveau .
|
