Tengo una duda con uno de mis ejercicios, en el que me he propuesto hacer una carga aleatoria sin repetir ingún nº en una tabla de 25elementos. No se si es un ejercicio del que necesito mas nociones básicas, puesto que solo llevo 3meses de curso y hemos llegado hasta los arrays (ordenación y búsquedas). No se si me hace falta algo algún conocimiento más.
En principio necesito alguna idea que me ilumine el camino a seguir ya que lo que he realizado tiene sentido pero no se como hacer la parte de generar un nº diferente a los que ya están puestos.
En principio necesito alguna idea que me ilumine el camino a seguir ya que lo que he realizado tiene sentido pero no se como hacer la parte de generar un nº diferente a los que ya están puestos.
Código (vbnet) [Seleccionar]
Public Class Form1
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Dim TB(4, 4) As Short
Dim TBC(24) As Short
Dim C_NUM As Short = 0
Dim H As Short = 0
For I As Short = 0 To 4
For J As Short = 0 To 4
TB(I, J) = Int((25 - 1 + 1) * Rnd()) + 1
TB(I, J) = TBC(H)
H = H + 1
Next
Next
H = 0
Do
For I = 0 To 4
For J = 0 To 4
If TBC(H) = TB(I, J + 1) Then
C_NUM = C_NUM + 1
TB(I, J + 1) = Int((24 - 0 + 1) * Rnd()) + 0
Else
C_NUM = C_NUM - 1
End If
Next
Next
H = H + 1
Loop While C_NUM > 0
For I = 0 To 4
For J = 0 To 4
TextBox1.Text = TextBox1.Text & TB(I, J)
Next
Next
End Sub
End ClasS
, yo mismo he visto muy raro tanto if... y elseif junto y repetido, lo que no me he dado cuenta es que justo como dices con un select case puedo usarlo para todas las opciones 
