Realiza los siguientes ejercicios en un mismo formulario, asignando un botón comando para cada uno.
Es importante que consideres la adición de controles y variables que sean necesarios.
1.- Identifica el posible resultado del siguiente segmento de código:
Randomize
For intR = 1 To 5
grdSerie.Row = intR
For intC = 0 To 3
grdSerie.Col = intC
grdSerie.Text = Int((Rnd * 50) + 1)
Next intC
Next intR
2.- De acuerdo al resultado del ejercicio anterior determina el resultado del siguiente segmento de código. El resultado se visualiza en una etiqueta.
intN = 0
For intR = 1 To 5
grdSerie.Row = intR
For intC = 0 To 3
grdSerie.Col = intC
If grdSerie.Text < intN Then
intN = grdSerie.Text
Label1.Caption = intN
End If
Next intC
Next intR
3. Tomando de referencia los resultados del Primer Ejercicio, genera el código para encontrar el número más grande (el mayor) de todos los que se generaron (visualízalo en una etiqueta).
4. Tomando de referencia los resultados del Primer Ejercicio, genera el código para determinar (poniendo un mensaje en una etiqueta) si existe el numero que el usuario desee (preguntarle al usuario mediante un InputBox).
Deben realizarse de manera individual.
Creditos: lemm