Hola muchis, alguien me puede ayudar a hacer mi programa de visual basic. Esta es la Instrucción: "Leer dos números enterHola muchis, alguien me puede ayudar a hacer mi programa de visual basic. Esta es la Instrucción: "Leer dos números enteros. Si la diferencia entre los dos en menor o igual a 10, entonces mostrar en pantalla todos los enteros comprendidos entre el menor el mayor de los números leídos.os. Si la diferencia entre los dos en menor o igual a 10, entonces mostrar en pantalla todos los enteros comprendidos entre el menor el mayor de los números leídos.

Respuestas

Respuesta dada por: Anónimo
2

Private Sub Command1_Click()

Dim n, n2, resta, mayor, menor As Integer

Dim cadena, valor As String

cadena = ""

n = CInt(Text1.Text)

n2 = CInt(Text2.Text)

resta = n - n2

If (n > n2) Then

mayor = n

menor = n2

Else

mayor = n2

menor = n

End If

If (resta <= 10) Then

For i = menor + 1 To mayor

valor = Val(i)

cadena = cadena + valor + vbCr

Next

MsgBox (cadena)

Else

Text3.Text = "" & resta

End If

End Sub

Adjuntos:

Anónimo: no tenia instalado en visual basic, pero por ayudarte lo hice en visual basic portable, y lo hice así porque al agregar un textbox al ejecutar el formulario se me cerraba, solo me permitía la ejecucion solo con un command button
nicolascapera1: ahh ok ese fue mi error
Anónimo: Ya actualizé la respuesta, ya instalé visual basic e hice el programa tal como lo pide el enunciado
melitacid002: MUCHAAAAS GRACIAAAAS!
Anónimo: de nada, por cierto en el ciclo for en la variable menor+1 quitele el +1 y solo deje la variable menor, asi le mostrara todos los numeros comprendidios desde el menor hasta el mayor, cualquier cosas me preguntas :)
melitacid002: Gracias, gracias :3
Anónimo: de nada siempre que pueda ayudarle, le ayudaré :) soy de ecuador un gusto haberle ayudado ;) ya me voy a dormir
Preguntas similares