< xs: sequence> Photos 
  
 
 < xs: nom de l'élément = Type " ContactName " = " xs: string "/> 
 
  
 
 < xs: nom de l'élément =" "type = " Téléphone xs : string "/> 
 
 < xs: nom de l'élément =" "type =" ShipToAddress usAddress " Hôtels 4 
 Cliquez sur l'onglet " Solution Explorer " sous " Solution Explorer" et double -cliquez sur " XMLFile1.xml " pour l'ouvrir. Copiez et collez le code suivant pour utiliser le schéma créé à l'étape 3 et ajouter des données à elle : 
 
 < xmlns __gVirt_NP_NN_NNPS<__ client = " http://tempuri.org/XMLSchema1.xsd " 
 5 
 Double -cliquez sur " Form1 " pour afficher votre formulaire. Double -cliquez sur " TextBox " dans le volet " boîte à outils " pour ajouter un nouveau contrôle de zone de texte. Ajouter huit autres contrôles de zone de texte à votre formulaire. Ajoutez un contrôle "Bouton" de votre formulaire. Double -cliquez sur " Button1" pour créer un nouveau clic - événement pour ce bouton . 
 6 
 Ajoutez la ligne de code suivante dans le très haut du module de code pour utiliser l'espace de noms " System.Xml " : Photos 
 Imports System.Xml 
 7 
 Copiez et collez le code suivant dans l'événement clic pour lire le fichier XML créé et enregistrer le contenu d' un tableau 2 -D: < br > 
 lecteur As XmlTextReader = new XmlTextReader ("C: \\ Temp \\ XMLFile1.xml " ) 
 
 Dim xmlDataArray (30, 1) As String 
 
 xCntr As Integer < br > 
 Do While ( reader.Read ()) 
 
 Select Case reader.NodeType 
 
 Case XmlNodeType.Element 
 
 ( reader.Name <> " client ») et ( reader.Name <>" ShipToAddress ") Then 
 
 xmlDataArray ( xCntr , 0) = reader.Name 
 
 End If 
 XmlNodeType Case 
 . texte Clip 
 xmlDataArray ( xCntr , 1) = reader.Value 
 
 xCntr + = 1 
 
 End Select 
 
 boucle 
 8 < p> Modifier le chemin du fichier XML à l'étape 7 , et tapez le chemin d'accès au fichier XML 
 9 
 parcourir le tableau et ajouter les données sur les zones de texte en ajoutant le code suivant : . < br > 
 xCntr = 0 To 10 
 
 ( xmlDataArray ( xCntr , 0) = " CompanyName ") Then 
 
 Me.TextBox1.Text = xmlDataArray ( xCntr , 1 ) < br > 
 End If 
 
 ( xmlDataArray ( xCntr , 0) = " ContactName ") Then 
 
 Me.TextBox2.Text = xmlDataArray ( xCntr , 1) 
 
 End If 
 
 ( xmlDataArray ( xCntr , 0) = "Email" ) Puis 
 
 Me.TextBox3.Text = xmlDataArray ( xCntr , 1) 
 
 End If < br > 
 ( xmlDataArray ( xCntr , 0) = " Téléphone ") Then 
 
 Me.TextBox4.Text = xmlDataArray ( xCntr , 1) 
 
 End If 
 
 Si ( xmlDataArray ( xCntr , 0) = " Nom ") Then 
 
 Me.TextBox5.Text = xmlDataArray ( xCntr , 1) 
 
 End If 
 
 ( xmlDataArray ( xCntr , 0) = " Street" ) Puis 
 
 Me.TextBox6.Text = xmlDataArray ( xCntr , 1) 
 
 End If 
 
 ( xmlDataArray ( xCntr , 0) = "City ") Then 
 
 Me.TextBox7.Text = xmlDataArray ( xCntr , 1) 
 
 End If 
 
 ( xmlDataArray ( xCntr , 0) = " Etat " ) 
 Puis 
 Me.TextBox8.Text = xmlDataArray ( xCntr , 1) 
 
 End If 
 
 ( xmlDataArray ( xCntr , 0) = " Zip ") Then < br > 
 Me.TextBox9.Text = xmlDataArray ( xCntr , 1) 
 
 End If 
 
 Suivant 
 10 
 Appuyez sur " F5" pour exécuter le programme . Cliquez sur " Button1" pour remplir les zones de texte.