[ad_1]
Imports System.Xml Imports System.IO Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim xmldoc As New XmlDataDocument() Dim xmlnode As XmlNodeList Dim i As Integer Dim str As String Dim fs As New FileStream("Book1.xml", FileMode.Open, FileAccess.Read) xmldoc.Load(fs) xmlnode = xmldoc.GetElementsByTagName("Book") For i = 0 To xmlnode.Count - 1 xmlnode(i).ChildNodes.Item(0).InnerText.Trim() str = xmlnode(i).ChildNodes.Item(0).InnerText.Trim() & " | " & xmlnode(i).ChildNodes.Item(1).InnerText.Trim() & " | " & xmlnode(i).ChildNodes.Item(2).InnerText.Trim() MsgBox(str) Next Me.DataGridView1.Rows.Add(TextBox1.Text, TextBox2.Text, ComboBox1.Text, TextBox3.Text) End Sub Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click XmlNodeList -= 1 If XmlNodeList < 0 Then XmlNodeList = 0 End If ShowData(XmlNodeList End Sub End Class
Lo que he probado:
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click XmlNodeList -= 1 If XmlNodeList < 0 Then XmlNodeList = 0 End If ShowData(XmlNodeList End Sub End Class
Solución 1
Tendrá que explicar mucho más claramente lo que está tratando de hacer y qué problemas tiene al hacerlo antes de que podamos comenzar a ayudarlo a resolver el problema: simplemente haga una pregunta como “¿Cómo puedo navegar por el registro (siguiente , anterior, primero y último)” que requiere cuatro métodos y simplemente proporcionar el código “Lo que he probado” para un método que ni siquiera se compila no le ayuda en absoluto.
Y, francamente, necesitas aprender algunos conceptos básicos de estilo de codificación antes de continuar.
En primer lugar: deje de usar los nombres predeterminados de Visual Studio para todo; puede recordar que “TextBox8” es el número de teléfono móvil actual, pero cuando tenga que modificarlo dentro de tres semanas, ¿lo hará? Utilice nombres descriptivos, “tbMobileNo”, por ejemplo, y su código será más fácil de leer, más autodocumentado, más fácil de mantener y sorprendentemente más rápido de codificar porque Intellisense puede llegar a “tbMobile” con tres pulsaciones de teclas, mientras que “TextBox8” requiere pensar. acerca de y 8 pulsaciones de teclas…
Seis botones o más, todos llamados “Botón1” a “Botón6”, con nombres predeterminados para un montón de cuadros de texto también significan que su código es ilegible sin mirar el diseño para determinar qué deben hacer los botones. Y eso significa que los errores son fáciles de cometer y difíciles de detectar.
Deja de usar MsgBox: está realmente desactualizado. Murió con VB6, allá por 2001, cuando se lanzó .NET, y existe sólo para que se pueda ejecutar el código VB6. Justo. Utilice MessageBox.Show en su lugar.
Ahora siéntate, piensa en tu tarea y en lo que tienes que hacer, y recuerda que no podemos ver tu pantalla, no podemos acceder a tu disco duro, no recibimos tu tarea de tu maestro y no podemos leer. tu mente. Solo recibimos exactamente lo que usted escribe: así que si desea ayuda, explique dónde está atascado, qué ha intentado y qué sucedió cuando lo hizo. Díganos qué ayuda necesita y recuerde que la tarea está ahí para ayudarle a aprender, por lo que no le daremos simplemente el código listo para entregar como si fuera su propio trabajo.
Solución 2
[ad_2]
コメント