Visual Basic - Eliminar elementos de una matriz

Life is soft - evento anual de software empresarial
 
Vista:

Eliminar elementos de una matriz

Publicado por Humberto (5 intervenciones) el 19/07/2008 19:24:42
Tengo una matriz estática con 100 preguntas para ser resueltas por los alumnos.
Necesito eliminar cada pregunta que sea respondida por el alumno con el propósito de que una pregunta no sea seleccionada dos veces para ser contestada por el mismo alumno o por otro participante.

Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Eliminar elementos de una matriz

Publicado por igor (633 intervenciones) el 19/07/2008 20:00:19
Para eliminar elementos de una matriz debes utilizar una dinámica.

En VB tendrías la instrucción redim con la codición preserve para redimensionar matriz.

El problema es que solo podrías eliminar elementos del final de la matriz.

Por eso igual es mejor que tengas otra matriz de 100 elementos tipo boolean que te indiquen si la pregunta del mismo indice ha sido respondida.

Dim Preguntas(100) as string
Dim Respondida(100) as boolean

for i=1 to 100
if Respondida(i)=true then
VisualizaPregunta()
end if
next i

Creo que es la opción mas sencilla en tu caso.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Eliminar elementos de una matriz

Publicado por Humberto (5 intervenciones) el 20/07/2008 00:52:03
Estoy trabajando en Visual Studio 2005.
Pero aún no logro controlar que cuando una pregunta haya sido seleccionada por un estudiante (sin importar su respuesta) sea eliminada de la matriz y no se pueda volver a seleccionar.

Este es mi código:
Public Class Form1
Dim contador As Integer = 1
Dim i As Integer
Dim Pregunta(5) As String
Dim Respondida(5) As Boolean

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'Datos de la matriz pregunta

Pregunta(0) = "Último teléfono movil de Apple"
pregunta(1) = "Formato que reemplaza al DVD"
Pregunta(2) = "Nombre de la biblioteca del colegio"
Pregunta(3) = "Fundador del colegio"
pregunta(4) = "Precio del barril de petroleo"

For contador = 1 To 5

i = InputBox("Escriba el número de su pregunta DEL 1 AL 5", "PREGUNTAS")
Label3.Text = Pregunta(i)

Next contador

End Sub

End Class

Muy amable por su colaboración
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Eliminar elementos de una matriz

Publicado por Rafael (5 intervenciones) el 22/07/2008 23:57:00
Igor, le agradezco mucho su valiosa ayuda que me permitio resolver el reto planteado.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar