Comment faire pour utiliser l’Assistant de mise à niveau de Visual Basic

Résumé

Cet article pas à pas explique comment créer une simple application Visual Basic 6.0, puis mettez à niveau l’application Visual Basic .NET ou Visual Basic 2005 à l’aide de l’Assistant de mise à niveau de Visual Basic dans Visual Studio .NET ou Visual Studio 2005.

Remarque L’Assistant Mise à niveau de Visual Basic .NET est inclus dans Visual Studio .NET Professional.

Remarque  L’Assistant de mise à niveau de Visual Basic 2005 a été amélioré dans les versions antérieures de Visual Basic.

Configuration requise

Les éléments suivants décrivent le matériel recommandé, logiciel, infrastructure réseau, compétences, connaissances et les service packs, que vous devez :
  • Microsoft Windows 2000 Professionnel (ou serveur), ou Microsoft Windows XP Professionnel (ou serveur) avec le.NET Framework installé
  • Microsoft Visual Basic 6.0
  • Microsoft SQL Server 7.0 ou version ultérieure avec la base de données Northwind, les autorisations et les valeurs des ID utilisateur et le mot de passe
Connaissances préalables requises :
  • Connaissance générale de la création d’applications à l’aide de Visual Basic 6.0

Utilisez l’Assistant Mise à niveau de Visual Basic

Les étapes suivantes vous indiquent comment créer une simple application Visual Basic 6.0, puis mettez à niveau l’application Visual Basic .NET ou Visual Basic 2005 à l’aide de l’Assistant de mise à niveau de Visual Basic dans Visual Studio .NET ou Visual Studio 2005 :
  1. Dans le menu Démarrer , pointez sur programmes, pointez sur Microsoft Visual Studio 6.0, puis cliquez sur Microsoft Visual Basic 6.0.
  2. Dans la boîte de dialogue Nouveau projet , cliquez sur EXE Standard, puis cliquez sur Ouvrir.
  3. Le premier formulaire de cette application utilise ADO pour récupérer un jeu d’enregistrements et affiche le jeu d’enregistrements dans un Microsoft Hierarchical FlexGrid Control. Dans le champ nom de la boîte de dialogue Propriétés de Form1, tapez
    frmADO.
  4. Si la boîte à outils n’est pas ouvert, dans le menu affichage , cliquez sur boîte à outils.
  5. À partir de la boîte à outils, placez un MSHFlexGrid sur le formulaire afin qu’il remplisse le formulaire. Laissez suffisamment d’espace au bas de l’écran pour placer un bouton.

    Remarque: Si vous ne voyez pas l’icône MSHFlexGrid dans la boîte à outils, ajouter à la boîte à outils. Avec le bouton droit de la boîte à outils, puis cliquez sur composants. Dans la boîte de dialogue composants , cliquez pour sélectionner Microsoft hiérarchique FlexGrid Control 6.0 (OLEDB) à partir de la liste des composants disponibles, puis cliquez sur OK.
  6. À partir de la boîte à outils, ajoutez un contrôle CommandButton sur le formulaire en dessous de la MSHFlexGrid. Dans le champ de la légende de la boîte de dialogue Propriétés , tapez sur OK.
  7. Cliquez sur mADO, puis cliquez sur Afficher le Code. Ajoutez le code suivant, qui crée une connexion de base de données et retourne un objet recordset qui contient toutes les données de la table Products de la base de données Northwind.

    Remarque: dans l’exemple de code suivant, vous devez modifier id utilisateur =< nom_utilisateur > et
    mot de passe =< mot de passe fort > les valeurs appropriées. Assurez-vous que l’ID utilisateur dispose des autorisations appropriées pour effectuer cette opération sur la base de données.
    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

  8. Appuyez sur CTRL + S pour enregistrer le formulaire. Dans le menu Fichier, cliquez sur Enregistrer sous. Dans la boîte de dialogue Enregistrer sous , cliquez sur Enregistrer.
  9. Dans l’Explorateur de projets, cliquez sur Project1, cliquez sur Ajouter, puis cliquez sur formulaire. Cliquez sur Ouvrir.
  10. Dans le champ nom de la boîte de dialogue Propriétés , tapez frmClipboard.
  11. À partir de la boîte à outils, placez un contrôle Textbox sur le formulaire. Dans le champ de texte , tapez le rapide renard brun a sauté par dessus le chien paresseux.
  12. Ajoutez un contrôle CommandButton au-dessous de la zone de texte. Dans le champ de la légende de la boîte de dialogue Propriétés , tapez Copy.
  13. Ajoutez un deuxième contrôle CommandButton sur le formulaire. Dans le champ de la légende de la boîte de dialogue Propriétés , tapez Coller.
  14. Cliquez sur frmClipboard, puis cliquez sur Afficher le Code. Collez le code suivant pour le bouton de commande cliquez sur événements. Ce code utilise le Presse-papiers objet Get et collez le texte :
    Private Sub Command1_Click()    Clipboard.SetText Text1.SelText
    End Sub

    Private Sub Command2_Click()
    Text1.SelText = Clipboard.GetText
    End Sub

  15. Appuyez sur CTRL + S pour enregistrer le formulaire.
  16. Le dernier formulaire dont vous avez besoin est le formulaire principal de l’application. Dans l’Explorateur de projets, cliquez sur Projet1et cliquez sur Ajouter, cliquez sur formulaire, puis cliquez sur Ouvrir.
  17. Dans le champ nom de la boîte de dialogue Propriétés , tapez frmMain.
  18. À partir de la boîte à outils, ajoutez un contrôle CommandButton sur le formulaire frmMain. Dans le champ de la légende de la boîte de dialogue Propriétés , tapez ADO.
  19. Ajoutez un deuxième contrôle CommandButton sur le formulaire. Dans le champ de la légende de la boîte de dialogue Propriétés , tapez le Presse-papiers.
  20. FrmMaind’avec le bouton droit, puis cliquez sur Afficher le Code. Collez le code suivant pour le bouton de commande cliquez sur événements pour afficher les deux autres formulaires :
    Private Sub Command1_Click()    frmADO.Show
    End Sub

    Private Sub Command2_Click()
    frmClipboard.Show
    End Sub

  21. Appuyez sur CTRL + S pour enregistrer le formulaire.
  22. Dans l’Explorateur de solutions, cliquez sur Projet1, puis cliquez sur Propriétés Projet1. Dans le champ Objet de démarrage , cliquez sur frmMain, puis cliquez sur OK.
  23. Pour ajouter une référence au composant ADO, dans le menu projet , cliquez sur références. Dans la liste des références disponibles, cliquez sur Bibliothèque d’objets Microsoft ActiveX données (n’importe quelle version 2.0 ou ultérieure fera l’affaire). Cliquez sur OK.
  24. Pour compiler le projet, dans le menu fichier , cliquez sur Faire une Project1.exe. Dans la boîte de dialogue Créer le projet , cliquez sur OK (accepter le nom de fichier par défaut).
  25. Appuyez sur F5 pour exécuter l’application en mode débogage.

    Remarque: vous n’avez pas besoin de vérifier que l’application Visual Basic héritée s’exécute sans problème avant la mise à niveau.
  26. Fermez l’environnement de développement Visual Basic. À l’invite pour enregistrer les modifications apportées au projet, cliquez sur Oui. Utilisez le nom par défaut et enregistrer le projet.
  27. Dans le menu Démarrer , pointez sur programmes, pointez sur Microsoft Visual Studio .NET, puis cliquez sur Microsoft Visual Studio .NET.
  28. Dans la Page de démarrage, cliquez sur Ouvrir un projet. Recherchez le dossier qui contient le fichier de projet Visual Basic 6.0 que vous venez de créer (généralement C:\Program Files\Microsoft Visual Studio\VB98). Cliquez sur Project1.vdp, puis cliquez sur Ouvrir.
  29. Visual Studio .NET détecte que ceci est un projet Visual Basic hérité et démarre l’Assistant Mise à niveau de Visual Basic. L’Assistant affiche une description de chaque étape avant de continuer les étapes, dans l’ordre suivant :
    • Créez un projet dans lequel votre projet existant est mis à niveau.
    • Copiez les fichiers de formulaire et des fichiers de classe dans le nouveau projet.
    • Fournit un rapport de mise à niveau qui répertorie les composants du projet mis à niveau avec succès et les composants qui ne s’est pas mis à niveau avec succès.

  30. Cliquez sur suivant dans chacune des étapes jusqu'à ce que le processus de mise à niveau commence. La mise à niveau prend environ 30 à 60 secondes.
  31. Dans l’Explorateur de solutions, double-cliquez sur _UpgradeReport.htm. Ce rapport affiche les résultats de la mise à niveau. Notez que tous les formulaires, à l’exception de frmClipboard mise à niveau sans problème.
  32. Développez frmClipboard.vb pour afficher les problèmes. Clipboard.SetText et GetText ne s’est pas mis à niveau correctement. Cliquez sur les liens dans la zone Description pour afficher comment corriger les problèmes.
  33. Dans l’Explorateur de solutions, notez que tous les formulaires conservé leurs noms d’origine, mais que l’extension de fichier est modifiée de .frm à. vb.
  34. Développez les références. Notez que les références à tous les composants qui sont nécessaires à l’utilisation de Visual Basic hérité et composants ADO ont été ajoutés automatiquement.
  35. Cliquez droit sur une des formes, puis cliquez sur Afficher le Code. Développez la région de Mise à niveau de la prise en charge . Cette zone affiche la façon dont Visual Studio .NET ou Visual Studio 2005 configuré différentes des propriétés et des variables pour prendre en charge de la mise à niveau du code.
  36. Dans l’Explorateur de solutions, cliquez sur frmClipboard.vb, puis cliquez sur Afficher le Code. Notez que les commentaires sont placé avant les lignes qui ne pas été mise à niveau.
  37. Modifier les événements de Command1_Click à Command2_Click à ce qui suit :
    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

Exemples de Code complets

Exécuter du Code (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

Exécuter du Code (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

Vérifier que l’Application fonctionne.

  1. Appuyez sur F5 pour démarrer l’application.
  2. À l’invite pour enregistrer le projet, cliquez sur OK.
  3. Dans Form1, cliquez sur ADO. Un écran apparaît et contient des données dans une grille. Fermer ce formulaire.
  4. Dans Form1, cliquez sur Presse-papiers.
  5. Cliquez sur Copier.
  6. Placez le point d’insertion dans la zone de texte au début du texte, puis cliquez sur Coller. Vous devez voir le texte collé.

Résolution des problèmes

Visual Basic .NET est une avancée importante des versions précédentes de Visual Basic. Pour de nombreux projets, un travail de préparation complet est recommandé avant la mise à niveau. Consultez le document suivant pour plus d’informations qui peuvent vous aider à mettre à niveau plus facilement :

RÉFÉRENCES

Pour plus d’informations, reportez-vous aux articles suivants de Microsoft Developer Network (MSDN) :
Propriétés

ID d'article : 317885 - Dernière mise à jour : 27 janv. 2017 - Révision : 1

Commentaires