Divisores de un numero entero

Se debe ingresar un numero entero en una caja de texto y a partir de este se debe de consultar los divisores de dicho numero, estos deben de ser mostrados en una lista (listbox)

1 Respuesta

Respuesta
1
Dim i
Dim a
a = Val(Text1.Text)
For i = 1 To a
If (a Mod i) = 0 Then
List1.AddItem (i)
End If
Next i
Donde text1 es donde ingresas el numero y list1 es el listbox de resultado. Debes pegar esto por ejemplo en un button_click y no te olvides de declarar o añadir al formulario el texto y el list.
Gracias por tu respuesta, es muy clara y fácil de entender, en verdad nunca había trabajado con esta función Mod de esta manera, gracias

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

¿Cómo puedo conseguir un programa que busque todos los clientes de una calle?

Hace poco me inicie en Visual Basic, con el fin de desarrollar una aplicación que se ajuste al trabajo familiar. El asunto es así: tenemos una extensa lista de clientes, con números de teléfono, dirección y nombre (con el único fin de cuando se llama...
5 respuestas

Comprobar si hay elemento seleccionado en ListBox

No veo como resolver la siguiente cuestión: Tengo un Listbox con datos y un botón para borrarlos. EL botón de borrado, no sólo elimina los elementos del ListBox, sino que también actúa sobre un contador. Lo que quiero es que el botón no haga nada (no...
2 respuestas

Qué tal chicos! , Cómo sumar ¿Valores de un listbox en un textbox automáticamente?

Tengo un listbox con 18 columnas, el cual lleno con datos según el código elegido en un combobox, mi intención es que al llenarse el listbox, también se haga automáticamente la suma total de los valores de la columna 18 en un textbox.
1 respuesta

Llenar un listbox con una función en PB

Quisiera me indicaras como puedo llenar un listbox con números; es decir ingreso un número por teclado y que me llene la lista con todos los números pares desde 1 hasta dicho número pero con una función, estoy haciendo lo siguiente: int nro, i...
1 respuesta

Importar archivo de texto de visual a access

Alguien podría ayudarme tengo este problema, miren tengo un archivo de texto llamado "orden.text", apart tengo un formulario en visual basic 6 el archivo orden lo quiero pasar a visual y de ahí que guard ese archivo en una tabla de access 2000 como...
1 respuesta

Validar formularios en access

Sabes mi nombre es francesca y necesito saber si me puedes ayudar a validar un formulario en access donde el rut debe aparecer validado y que si ingreso el rut en otro formulario aparezcan los datos del usuario a quien le corresponde el rut
1 respuesta

Generar números aleatorios que no se repitan

Necesito crear una función en VBA la cual me genere números aleatorios que no se repitan, tengo el siguiente código pero no estoy seguro que esdta función así de simple evite crear números aleatorios que se repitan Dim MyValue 'MyValue = Int((1000000...
2 respuestas

Sumar rangos de números

La pregunta es como se suman números dentro de un rango, que código se escribe.
1 respuesta

ListBox

Tengo una listbox creada y con datos dentro pero... No se como consultar cada una de las filas y tampoco se mirar si estas están marcadas o no. Se que es una pregunta fácil pero llevo mucho tiempo probando las propiedades y métodos y no lo...
1 respuesta

Complemento a:¿Cómo modificar valor en un campo(columna) de una hoja excel, desde un ListBox VBA?

Que me dio una gran solución, he podido continuar con mi proyecto, pero me quedó dando vuelta una nueva consulta sobre lo mismo. ¿Cómo puedo hacer para que no se ejecute nada, mientras no seleccione algún registro en el LISTBOX? En lo posible con...
1 respuesta