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:
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
Preguntas similares
hace 6 años
hace 6 años
hace 9 años
hace 9 años
hace 9 años