Visual Basic - ejercicio

Life is soft - evento anual de software empresarial
   
Vista:

ejercicio

Publicado por Alejandro (1 intervención) el 30/01/2008 14:05:01
ola tengo un problema q no se ni como empezar si me lo podeis solucioner mejor es muy sencillo pero ya sabeis q pasa con esas cosas q tan faciles q te vuelves loco XD

"Escribe un programa que tome 2 numeros e indique si son enteros introducidos por teclado y los escriba en una etiqueta de mayor a menor separados por guiones"

gracias y un abrazo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ejercicio

Publicado por Locomevuelo (1 intervención) el 30/01/2008 17:32:47
No se que quieres de cir con si son introducidos por teclado, ¿como los introduces si no? toma un poco de codigo con un boton ,dos cajas de texto y una etiqueta.

Option Explicit

Dim NumUno As Single
Dim NumDos As Single
Private Sub Command1_Click()
NumUno = Text1.Text
NumDos = Text2.Text

If NumUno = CInt(NumUno) Then
MsgBox "El primer numero es entero"
Else
MsgBox "El primer numero NO es entero"
End If
If NumDos = CInt(NumDos) Then
MsgBox "El segundo numero es entero"
Else
MsgBox "El segundo numero NO es entero"
End If
If NumUno > NumDos Then
Label1.Caption = NumUno & " - " & NumDos
Else
Label1.Caption = NumDos & " - " & NumUno
End If
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar