Two forms

[qatarya3sal]

*** This is the first form i called it Form1?******
************************************************** ********

Imports System.Xml
Imports System.IO
Public Class Form1
    Inherits System.Windows.Forms.Form
 
 Private Sub btnFile_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lodbtn.Click
 
        Dim ofd As OpenFileDialog = New OpenFileDialog
        Dim result As DialogResult = ofd.ShowDialog()
        If result = DialogResult.Cancel Then
            Return
        End If
 
        Dim document As XmlDocument = New XmlDocument
        document.Load(ofd.FileName)
 
        Dim reader As XmlNodeReader = New XmlNodeReader(document)
        MsgBox("The File is loaded successfully!")
 
        lblLoad.Text = (System.IO.Path.GetFullPath(ofd.FileName))
 
        Disbtn.Enabled = True
 
 
 
    End Sub
 
    Private Sub Displaybtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Disbtn.Click
        Dim f As CourseDisplay
        f = New CourseDisplay
        f.Show()
    End Sub
 
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
    End Sub

********* This is the second form i called it CourseDisplay.vb***********
************************************************** *******************************

Imports System.Xml
Imports System.IO
Public Class CourseDisplay
Inherits System.Windows.Forms.Form
 
Private Sub Display_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
 
        Dim document As XmlDocument = New XmlDocument
        document.Load("CP2830.xml")
 
        Dim reader As XmlNodeReader = New XmlNodeReader(document)
 
        While reader.Read()
 
            If reader.Name = "courseID" Then
                Label1.Text = reader.ReadElementString()
            End If
 
            If reader.Name = "courseName" Then
                Label2.Text = reader.ReadElementString()
            End If
  End While
 
 
        For i = 0 To Student.GetUpperBound(0)
            sum += Convert.ToInt32(Student(i))
        Next
 
        Label4.Text = studnetcount
 
    End Sub
 
    Private Sub clobtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles clobtn.Click
 
        Me.Close()
 
    End Sub
End Class
 

that what i did

*********** the problem is how can i leave it to read the studnent

or how i can do this ( that i have to do it )

tempStr is a stirng variable
studentCount is an integer variable
studentCount =0
WHILE there are more tags

if tag is "courseID"
read contents and display on form
END IF

if tag is " courseName"
read contents and display on form
END IF
if tag is "studnet"
tempStr = " "
Skip to next tag
we are now on studnetID
read contents of tag , add to tempStr, advance

we are now on studnetName
read contents of tag , add to tempStr, advance

we are now on porgram
read contents of tag , add to tempStr, advance

Display tempStr on form
Add 1 to studnentCount

[debasisdas]

Question moved to .NET Forum.

[kenobewan]

Please give more information about your problem or error you are receiving. What are you trying to do? Thanks.

[qatarya3sal]

Please give more information about your problem or error you are receiving. What are you trying to do? Thanks.

I don't have error but i don't know how to do some steps .. the last one

please help me

*********** the problem is how can i leave it to read the studnent

or how i can do this ( that i have to do it )

tempStr is a stirng variable
studentCount is an integer variable
studentCount =0
WHILE there are more tags

if tag is "courseID"
read contents and display on form
END IF

if tag is " courseName"
read contents and display on form
END IF
if tag is "studnet"
tempStr = " "
Skip to next tag
we are now on studnetID
read contents of tag , add to tempStr, advance

we are now on studnetName
read contents of tag , add to tempStr, advance

we are now on porgram
read contents of tag , add to tempStr, advance

Display tempStr on form
Add 1 to studnentCount

--------------------------------------------------------------------------------

[qatarya3sal]

:( nobady can help me

[Shashi Sadasivan]

What are you trying to do?

[qatarya3sal]

What are you trying to do?

what i try to do

Dim document As XmlDocument = New XmlDocument
document.Load("CP2830.xml")

Dim reader As XmlNodeReader = New XmlNodeReader(document)

While reader.Read()

If reader.Name = "courseID" Then
Label1.Text = reader.ReadElementString()
End If

If reader.Name = "courseName" Then
Label2.Text = reader.ReadElementString()
End If

before i end the while i have to do this steps

tempStr is a stirng variable
studentCount is an integer variable
studentCount =0
WHILE there are more tags

if tag is "courseID"
read contents and display on form
END IF

if tag is " courseName"
read contents and display on form
END IF
if tag is "studnet"
tempStr = " "
Skip to next tag
we are now on studnetID
read contents of tag , add to tempStr, advance

we are now on studnetName
read contents of tag , add to tempStr, advance

we are now on porgram
read contents of tag , add to tempStr, advance

Display tempStr on form
Add 1 to studnentCount

after that i end while

i want to read every studnet id , name and program

now i clear or not

[Frinavale]

what i try to do

Dim document As XmlDocument = New XmlDocument
document.Load("CP2830.xml")

Dim reader As XmlNodeReader = New XmlNodeReader(document)

While reader.Read()

If reader.Name = "courseID" Then
Label1.Text = reader.ReadElementString()
End If

If reader.Name = "courseName" Then
Label2.Text = reader.ReadElementString()
End If

before i end the while i have to do this steps

tempStr is a stirng variable
studentCount is an integer variable
studentCount =0
WHILE there are more tags

if tag is "courseID"
read contents and display on form
END IF

if tag is " courseName"
read contents and display on form
END IF
if tag is "studnet"
tempStr = " "
Skip to next tag
we are now on studnetID
read contents of tag , add to tempStr, advance

we are now on studnetName
read contents of tag , add to tempStr, advance

we are now on porgram
read contents of tag , add to tempStr, advance

Display tempStr on form
Add 1 to studnentCount

after that i end while

i want to read every studnet id , name and program

now i clear or not

Have you tried to just......write the code for this?

It appears that you know what you want to do.
Have you tried to Do It?

[qatarya3sal]

Have you tried to just......write the code for this?

It appears that you know what you want to do.
Have you tried to Do It?

yes i tried to do it but i don't now how to do it can you help me

[qatarya3sal]

My questions is hard or what nobady can help me or what

[Shashi Sadasivan]

For starters,
Its difficult to follow your code.
I would rather get back to work..than take some time off it and go through your code (There is no valid commenting, nor have you used the code tags)

Secondly, You do seem to have coded all what you want, but are failing to explain what you want to do.

So think about what you want (dont expect someone over here to write code for you)
We will be happy with fixing up your code.

[Frinavale]

My questions is hard or what nobady can help me or what

First of all, It is difficult for the experts to answer questions when there is not enough details provided to understand the problem.

Secondly, to me it feels as if you are asking the us to do a homework assignment for you. It seems as if you have had some code given to you and you are to add onto the assignment or programming. It is also a rule here that members of this fourm not provide full solutions to homework problems.

The experts on this forum are more than happy to help you with a specific problem that you are facing.

Please attempt to solve the problem first and then post your question about specific problems that you are encountering.

[qatarya3sal]

Dim tempStr  as string' (tempStr is a stirng variable it) 
Dim studentCount as integer = 0'(studentCount is an integer variable)
 
While reader.Read()   '((WHILE there are more tags)) 
 
'((if tag is "courseID"
'read contents and display on form
'END IF) )
 
If reader.Name = "courseID" Then
    Label1.Text = reader.ReadElementString()
End IF
 
'((if tag is " courseName"
'read contents and display on form
'END IF))
 
If reader.Name = "courseName" Then
    Label2.Text = reader.ReadElementString()
End If
 
'((((if tag is "studnet"
'tempStr = " "
'Skip to next tag
'we are now on studnetID
'read contents of tag , add to tempStr, advance
 
'we are now on studnetName
'read contents of tag , add to tempStr, advance
 
'we are now on porgram
'read contents of tag , add to tempStr, advance))))
 
 
If reader.Name = "student" And reader.NodeType = XmlNodeType.Element Then
                tempStr = ""
 
                If reader.Name = "studentID" Then
                    ListBox1.Text = tempStr + reader.ReadElementString()
                End If
                If reader.Name = "studentName" Then
                    ListBox1.Text = tempStr + reader.ReadElementString()
                End If
                If reader.Name = "program" Then
                    ListBox1.Text = tempStr + reader.ReadElementString()
                End If
            End If
                ReDim Preserve Student(index)
                Student(index) = reader.ReadElementString()
                index += 1
                studnetcount += 1
            End If
 
 
        For i = 0 To Student.GetUpperBound(0)
            sum += Convert.ToInt32(Student(i))
        Next
 
        Label4.Text = studnetcount
 
    End Sub
        End While

when i did that nothing in the screen i don't know what problem it cant read the student id ,name and porgram

this is my work now do understand or no
Display tempStr on form
Add 1 to studnentCount

[Frinavale]

I'm not sure what type of object your reader variable is.
It's the only one that doesn't appear to be defined in this code.

In the future, when posting code, please use [code] tags.
An example of posting VB.NET code would be:
[code=vbnet]
'My VB.NET Code pasted here
[/code]

[qatarya3sal]

I'm not sure what type of object your reader variable is.
It's the only one that doesn't appear to be defined in this code.

In the future, when posting code, please use [code] tags.
An example of posting VB.NET code would be:

'My VB.NET Code pasted here
 

reader to read

i want to know if anybody can understand what i want and help me or no