Ayuda con arraylist...Vb.net ???

[ronald hisp]

bueno hice un sistema que te pide.
1.- curso
2.- nota
3.- fecha

todo eso lo guardo en un arraylist

 

Código [Seleccionar] Expandir



   Private curso As String
   Private nota As Double
   Private fecha As Date

   Public texto As String = ""

   Public array_exam As New ArrayList

'
  Sub insertar()
       texto += "Curso:" & curso & vbCrLf & "Nota=" & nota & vbCrLf & " fecha="
                    &fecha & vbCrLf & vbCrLf
           array_exam.Add(texto)
   End Sub
Sub mostrar()
       For i = 0 To array_exam.Count() - 1
           texto += array_exam.Item(i)
       Next
End Sub



hasta ahora no ay problemas:

1.-buscar:   pero ahora quiero buscarlo por cursos. nose me ocurre como.  
2.-modificar: antes busco el curso y sobreescribo el curso y sus demas datos y lo guardo y muestro...  

esas dos son mis dudas no se me ocurre una solucion ... espero que me puedan sacar de este predicamento....

antemano Gracias por sus respuestas..
 

[Keyen Night]

Bueno para que se te sea más facil te recomiendo hacer una clase, como no tenia nada que hacer te la hice:

Código (vbnet) [Seleccionar] Expandir

Public Class Exam

   Private _curso As String
   Private _nota As Double
   Private _fecha As Date

   Public Sub New(ByVal Curso As String, ByVal Nota As Double, ByVal Fecha As Date)
       _curso = Curso
       _fecha = Fecha
       _nota = Nota
   End Sub

   Public Overrides Function ToString() As String
   Return "Curso: " & _curso & vbCrLf & "Nota:" & _nota & vbCrLf & "fecha:" & _fecha & vbCrLf & vbCrLf
   End Function

   Public Property Curso() As String
       Get
           Return _curso
       End Get
       Set(ByVal _Enter As String)
           _curso = _Enter
       End Set
   End Property

   Public Property Nota() As Double
       Get
           Return _nota
       End Get
       Set(ByVal _Enter As Double)
           _nota = _Enter
       End Set
   End Property

   Public Property Fecha() As Date
       Get
           Return _fecha
       End Get
       Set(ByVal _Enter As Date)
           _fecha = _Enter
       End Set
   End Property

End Class

Bueno con lo otro es más facil como te dije anteriormente al implementar una clase

Código (vbnet) [Seleccionar] Expandir


''CREAEMOS UNA LISTA DE EXAMENES
       Dim x As New List(Of Exam)

''AÑADIMOS 3 EXAMENES CON SU RESPECTIVA INFORMACIÓN
       x.Add(New Exam("Curso 1", 5.2, Now))
       x.Add(New Exam("Curso 2", 7.5, Now))
       x.Add(New Exam("Curso 2", 9.2, Now))
''EDITAMOS LA NOTA DEL CURSO 1 EL EXAMEN QUE SACO 5.2 LO PASAMOS A 10
       x.Item(0).Nota = 10

       Dim CursoABuscar = "Curso 2"

''RECORREMOS TODOS LOS EXAMENES BUSCANDO LOS QUE PERTENECEN AL CURSO "CURSO 2"
        For Each Examen As Exam In x
            If Examen.Curso = CursoABuscar Then
                MsgBox(Examen.ToString, Nothing, Examen.Curso)
            End If
        Next
Espero que te sirva...

[raul338]

Bueno para que se te sea más facil te recomiendo hacer una clase, como no tenia nada que hacer te la hice:

jaja...aguanten los que no tienen que hacer nada xD

Buena implementacion, aunque igual no hacia falta hacer "alta clase", con una estructura era suficiente y te ahorras unos kb's de codigo y escritura xD XD

Ademas le falta la implementacion "ToString()" para que lo imprima en consola

Código (vbnet) [Seleccionar] Expandir

Public Overrides Function ToString() As String
   Return "Curso: " & _curso & vbCrLf & "Nota:" & _nota & vbCrLf & "fecha:" & _fecha & vbCrLf & vbCrLf
End Function

ahi esta mejor  

OFFTOPIC: Tengo un byte de mensajes xD XD (miren mi cantidad de mensajes)

[Keyen Night]

Buena implementacion, aunque igual no hacia falta hacer "alta clase", con una estructura era suficiente y te ahorras unos kb's de codigo y escritura xD XD

Bueno todo depende de como quieras el resultado final, si estás buscando que pese lo menos posible, si buscas perfección, comididad o cualquier otra cosa cambiará el codigo así se use para lo mismo.
A mi me parecio más facil con una clase pero con una estructura tambien se podia hacer

Si falto ToString me gusto mas la etiqueta code=vbnet; cuidado que solo tienes 1 Byte para postear y si comentas otra vez te daras error xD

[ronald hisp]

Ok muchas gracias por sus respuestas--- gracias a sus respuestas pude pasar mi examen de (array y arraylist), pude responder los porques.. gracias... ahora repasar full herencia y polimorfismo... , luego excepciones  y para aprobar mi examen de base datos. Cualquier duda que se me ocurra la posteare ...

Bueno ... muchasss gracias por su apoyo..  se merecen unos      

[Skeletron]

Pero, que te quede claro lo que te han explicado...
O sea.. pasa al siguiente tema, solo si entendiste y creer que eres capaz de hacerlo por ti solo

[ronald hisp]

Bueno aqui comentando una duda mas que no puedo lograr:

Estoy sufriendo en base de datos..
no se como hacer reportes (crystal reports en vb.net) pero mi base de datos esta en MySql.

Busque info sobre crystal reports+vb.net y encontre mediante acces y sql pero muy poco de MySql pero con OLDB(mi conexion no es con OLDB) y no se como hacerlo ... hojala que me puedan ayudar en eso...
bueno el reporte ah crear es cuando termino de matricular aun alumno me muestre dando en el boton mostrar(todo osea fecha,codigo,su nombre ,etc)

esa es mi duda.
encontre ejemplos con sql pero muy poco con MySql...
**************************************************
oh otra cosa que encontre es mediante el formulario... jalar los texbox y los date time picker... eso creo seria mas facil...  o seria complicarme mas la vida..

Espero sus consejos....

[seba123neo]

Hola, el motor de base de datos no importa a la hora de hacer reportes (no por lo menos de la forma que yo los hago), yo los hago a la "vieja escuela", como los hacia en visual basic 6, los armo en el diseñador de visual studio y desde ahi mismo en el codigo, le paso la consulta SQL y me la toma como origen de datos y listo. pero hay que armar antes la estructura del reporte(los campos), en visual basic 6 tenias que crear unos archivos .ttx, pero ahora en .NET debes insertar un DataSet, y dentro del dataset crear un DataTable y a este ingresarle la estructura del reporte, no me acuerdo, pero creo que en la pagina del guille esta explicado.

saludos.