Autor Tema: Visual Basic 6.0 saber si numeros son pares o impares  (Leído 71566 veces)

DoPeY-BBS

  • Sin experiencia
  • *
  • Mensajes: 43
    • Ver Perfil
Visual Basic 6.0 saber si numeros son pares o impares
« en: 16 de Febrero 2013, 22:09 »
Saludos, ¿cómo están? necesito saber el poque si declaro dos variables.. una bytes y otra integer..  da error invalid compile quolifier

Código: [Seleccionar]
Private Sub boton1_Click()
Dim numero As Integer
Dim mostrar As String

numero = Val(numero.Text)

If numero = Int(numero / 2) * 2 Then
    mostrar.Text = "es par"
Else
    mostrar.Text = "es impar"
End If

End Sub

Mientras que si le quito los dim.... hace su trabajo completo.
« Última modificación: 20 de Septiembre 2014, 18:34 por Alex Rodríguez »
Codifica tu vida

César Krall

  • Moderador Global
  • Experto
  • *******
  • Mensajes: 2078
  • No vales por lo que dices, sino por lo que haces
    • Ver Perfil
    • aprenderaprogramar.com
Re:Visual Basic 6.0 numeros pares e impares
« Respuesta #1 en: 17 de Febrero 2013, 20:00 »
Hola dopey, aquí tienes un código para hallar si un número es par o impar: https://www.aprenderaprogramar.com/index.php?option=com_content&view=article&id=251:ejercicios-ejemplos-con-operador-mod-y-con-if-then-else-en-visual-basic-cu00324a&catid=37:curso-qprogramacion-en-visual-basic-nivel-iq&Itemid=61

En el código que has puesto hay un par de cosas que no entiendo: ¿si declaras número como Integer (entero) qué significado tiene la línea numero = Val(numero.Text)

Se supone que el Val lo usarás para capturar un dato que haya introducido el usuario por teclado. Si numero es el nombre de un textbox sobre el dim, y si numero es un integer sobra el val.

Por otra parte la forma de saber si un número es par será saber el resto de dividirlo entre 2. Esto se hace con el operador mod. Por ejemplo 12 mod 2 devuelve cero porque 12 entre 2 resulta 6 con resto cero. En cambio 13 mod 2 devuelve uno porque 13 entre 2 resulta 6 con resto uno. Saludos.
Responsable de departamento de producción aprenderaprogramar.com

DoPeY-BBS

  • Sin experiencia
  • *
  • Mensajes: 43
    • Ver Perfil
Re:Visual Basic 6.0 numeros pares e impares
« Respuesta #2 en: 18 de Febrero 2013, 03:48 »
Perdona pero, no entiendo cuando hablas sobre lo del val, osea, mi intención es hacer la conversión y al mismo tiempo colocar el tipo de dato como integer...

Edito

Ya entendí lo que quieres decir.... tengo que declarar una variable (en este caso numero) y poner un name diferente al objeto.. al menos eso pienso
« Última modificación: 18 de Febrero 2013, 04:17 por DoPeY-BBS »
Codifica tu vida

César Krall

  • Moderador Global
  • Experto
  • *******
  • Mensajes: 2078
  • No vales por lo que dices, sino por lo que haces
    • Ver Perfil
    • aprenderaprogramar.com
Re:Visual Basic 6.0 numeros pares e impares
« Respuesta #3 en: 18 de Febrero 2013, 11:48 »
Efectivamente, los objetos deben tener sus nombres, por ejemplo un textBox se puede llamar TextBox1 ó UserInput1.

Luego para recoger un dato introducido por el usuario tendrás que usuar una variable, con otro nombre distinto al del objeto, por ejemplo userNumber1 ó number1 y si de lo que se trata es un número usar val para capturar el número que haya introducido el usuario.
Responsable de departamento de producción aprenderaprogramar.com

 

Sobre la educación, sólo puedo decir que es el tema más importante en el que nosotros, como pueblo, debemos involucrarnos.

Abraham Lincoln (1808-1865) Presidente estadounidense.

aprenderaprogramar.com: Desde 2006 comprometidos con la didáctica y divulgación de la programación

Preguntas y respuestas

¿Cómo establecer o cambiar la imagen asociada (avatar) de usuario?
  1. Inicia sesión con tu nombre de usuario y contraseña.
  2. Pulsa en perfil --> perfil del foro
  3. Elige la imagen personalizada que quieras usar. Puedes escogerla de una galería de imágenes o subirla desde tu ordenador.
  4. En la parte final de la página pulsa el botón "cambiar perfil".