lancio di Microsoft Visual Studio . Fare clic su " Nuovo Progetto" dal riquadro sinistro dello schermo del computer , e di espandere " Visual Basic " di sotto " Modelli installati . " Fare clic su "Windows" e fare doppio clic su " Applicazione Windows Form " dal centro della finestra di dialogo per creare un nuovo progetto .
2 Fare clic sul menu "Progetto" e selezionare " Nuovo elemento ". Fare doppio clic su " File XML" per inserire un nuovo file XML al progetto . Inserire un nuovo file " XML Schema " , con la stessa tecnica
3
Copia e incolla il seguente codice all'interno del file " XMLSchema1.xsd " per creare il vostro schema XML : .
< xs : schema name = " postalCode " >
< /xs : restrizione > < /xs : simpleType > < xs type="xs:string" : nome dell'elemento = tipo di " Street" = "xs : string " /> < xs : nome dell'elemento = " Stato " type = " xs: string " /> < /xs : sequence > < /xs : complexType > < xs : sequenza > < xs : nome dell'elemento = tipo " NomeContatto " = " xs: string " /> < xs : nome di elemento = " " type = " Telefono xs : stringa " /> < xs : nome di elemento = " " type = " ShipToAddress usAddress " 4 Fare clic sulla scheda " Esplora soluzioni " sotto " Solution Explorer " e fare doppio clic su " XMLFile1.xml " per aprirla. Copiare e incollare il seguente codice per utilizzare lo schema creato nel passaggio 3 e aggiungere alcuni dati su di esso : < xmlns cliente = " http://tempuri.org/XMLSchema1.xsd " doppio clic su " Form1 " per visualizzare il modulo. Fare doppio clic su " TextBox " dal riquadro " Casella degli strumenti " per aggiungere un nuovo controllo casella di testo . Aggiungere altri otto controlli casella di testo al form. Aggiungere un controllo " Button " al form. Fare doppio clic su " Button1 " per creare un nuovo click- evento per questo pulsante . Aggiungere la seguente riga di codice nella parte superiore del modulo di codice per utilizzare lo spazio dei nomi " System.Xml " : Imports System.Xml Copia e incolla il seguente codice all'interno del evento click per leggere il file XML creato e salvare il contenuto in un array 2-D : Dim reader Come XmlTextReader = New XmlTextReader ( "C : \\ Temp \\ XMLFile1.xml " ) per Dim xmlDataArray ( 30 , 1) As String Dim xCntr As Integer Do While ( reader.Read ( ) ) per Select Case reader.NodeType caso XmlNodeType.Element ( reader.Name < > " cliente ") e ( reader.Name < > " ShipToAddress " ) Poi xmlDataArray ( xCntr , 0 ) = reader.Name End If caso XmlNodeType . testo xmlDataArray ( xCntr , 1 ) = reader.Value xCntr + = 1 End Select loop Modificare il percorso del file XML in Step 7 , e digitare il percorso del file XML scorrere la matrice e aggiungere i dati per le caselle di testo , aggiungendo il seguente codice : . xCntr = 0 a 10 ( xmlDataArray ( xCntr , 0 ) = " CompanyName " ) Poi Me.TextBox1.Text = xmlDataArray ( xCntr , 1) < br End > Se ( xmlDataArray ( xCntr , 0 ) = " NomeContatto " ) Poi Me.TextBox2.Text = xmlDataArray ( xCntr , 1 ) per End If ( xmlDataArray ( xCntr , 0 ) = "Email " ) Poi Me.TextBox3.Text = xmlDataArray ( xCntr , 1 ) per End If ( xmlDataArray ( xCntr , 0 ) = " Telefono " ) Poi Me.TextBox4.Text = xmlDataArray ( xCntr , 1 ) per End If Se ( xmlDataArray ( xCntr , 0 ) = "Nome" ) Poi Me.TextBox5.Text = xmlDataArray ( xCntr , 1 ) per End If ( xmlDataArray ( xCntr , 0 ) = "Street " ) Poi Me.TextBox6.Text = xmlDataArray ( xCntr , 1 ) per End If ( xmlDataArray ( xCntr , 0 ) = " City" ) Poi Me.TextBox7.Text = xmlDataArray ( xCntr , 1 ) per End If ( xmlDataArray ( xCntr , 0 ) = " Stato " ) Poi Me.TextBox8.Text = xmlDataArray ( xCntr , 1 ) per End If ( xmlDataArray ( xCntr , 0 ) = " CAP ") Then Me.TextBox9.Text = xmlDataArray ( xCntr , 1 ) per End If Prossimo Premere " F5 " per eseguire il programma . Fare clic su " Button1 " per popolare le caselle di testo .
5
6
7
8
9
10
Informazioni correlate
Programmazione © www.354353.com