Hacer un programa o algoritmo que pida 10 edades y mostrarlas en orden inverso al que fueron ingresados.
Codigo Fuente en Visual Basic
Public Class Form1
Dim con As Integer = 0
Dim cad As String = ""
Dim entrada As String = ""
Dim Edad(9) As String
Private Sub Button1_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles Button1.Click
If (con <> 10) Then
Edad(con) = TextBox1.Text
Button1.Text = "Ingresar " + Trim(con)
entrada = entrada + Edad(con) & vbCrLf
TextBox2.Text = entrada
con = con + 1
Else
cad = ""
For j As Integer = 9 To 0 Step -1
cad = cad + " " + Edad(j) & vbCrLf
Next j
TextBox3.Text = cad
End If
End Sub
End Class

0 comentarios:
Publicar un comentario