La idea es introducir una palabra en un textbox y que en una lista salgan las combinaciones.
Tambien se podrian introducir las letras en varios textbox, pero es preferible la primera opcion.
Gracias.

solo lo que se deberia agregar, es que para saber la cantidad de convinacion de una serie de letras, numeros, etc. por ejemplo:

[Se me dio un dia escribir frases y esta me dio aliento]

Para saber la convinacion que se puedan realizar de todos estos caracteres y espacios (aun que sean repetidos) solo se debe contar el numero total y multiplicar por sus antesesores es decir:

la longitud es de 44 letras

Se multiplicaria

El Total es de:

2.658271575x₁₀⁵⁴ combinaciones (son bastantes no)

en algo mas sencillo como


el total de las letras son 7

así que se multiplicaria

7x6x5x4x3x2x1=5040 combinaciones sin repetir

Amm si eso parece con eso de que ya van a salir algunos de sus escuelas (colmo) se ven a varios, pero en todo caso el error aqui es dar un codigo es mejor dar la info o link a donde se de info detallada mas no el Source hecho, posiblemente ayudar con un codigo que ya este realizando pero NUNCA darselo REALIZADO/HECHO y mucho menos si NO SABE NADA DE NADA ¬¬".

Edito para no RE-POST--------

En la Bandeja de Privados tengo:

Usa tu cabeza o leete un Manual y si no Sabes dejalo.

Por Dios si es la palabra "Hola" el total es de 4x3x2x1=24 combinaciones SIN Repetir
Si es "P e n d e j o" (sin espacios) el total es de 7x6x5x4x3x2x1=5040 combinaciones SIN Repetir.

Por favor no pidas mas de las que son Matematicamente ¬¬# ademas ya lo explique en el 3er post de este TEMA.


Bueno este tipo que, apoco no sabe algo Sencillo como usar los TextBox y sus propiedades?

Solo me queda decir: nadie es maestro de nada, este foro es de dudas y respuestas PERO TENIENDO BASES en sus dudas, por Luci.

NO INTENTES CORRER SIN ANTES SABER CAMINAR Y APENAS ESTAS GATENADO O EN SU DEFECTO TE ESTAN CARGANDO ¬¬".

P.D.: Si a alguien ofendo con las mayusculas no esperen disculpas ya que solo así se entiende.!!¡¡ (ojala pudiera meter la mano al monitor y pegarle un susto endemoniado a... pero no se puede ¬¬ posiblemente en unos 2 siglos ya xP)

por Luci ¬¬"

Usar un timer Error Feo.
No Limpias las variables.
MuchasLineas de Codigo.

por Luci ¬¬"

Conclución Codigo Feo e Ineficiente (al timer en interval le pongo cada 10 segundos y tardaria un buen en deducer las combinaciones ¬¬" )

Aca dejo mi Codigo menos lineas y menos memoria de uso.

Solo agregar un modulo y pegar este codigo (No se nesesita formulario en el Proyecto)

Configurar el proyecto para que arranque el proceso Sub Main (Solo si tienes un Formulario en el proyecto) y listo correrlo.

Option Explicit
Sub main()
    MsgBox NumConvinacion(Val(InputBox("Numero de Caracteres:", "Cantidad", "1")))
End Sub
Function NumConvinacion(Optional ByVal Cantidad As Integer = 1) As Double
    NumConvinacion = 1
    Dim i As Integer
    For i = 1 To Cantidad: NumConvinacion = NumConvinacion * i: Next i
End Function
 

P.D.: se limita a    170!

Dulces Lunas