debeias poner un progreso de carga y descarga solo si tu programa es REALMENTE pesado y sabes que cargara todo antes de iniciar (por ejemplo un calculo matematico complejo que requiera escanear algo o no se) pero en su puedes poner algo así

with barra
.min=0
.max=100
.value=0
end with
 

en un timer para ver como funciona

static iv as integer
iv=iif(iv=100,0,iv+1)
barra.value=iv
 

haber si te sirve
P.D.: nesesitas agregar el componente



Accede a Componentes con Control+T despues
busca y activa
Microsoft Windows Common Controls 6 (sp6)
aceptra todo
dibuja el control Progressbar
cambia su nombre a Barra
lo demás es cosa tuya.

si de hecho al termino del proceso se limpian sea cual sea. almenos que esten declaradas globalmente en un modulo o en el "encabezado" (hasta arrribobota donde no da la luz jo) en un formulario.

o ALMENOS que uses Static para declararlas hay no se limpian

Ejemplo:

{
dim variable
´demas procesos
}
en este caso se limpia cuando termina

{
Static variable
´demas procesos
}
en este caso perduraran los datos almacenados almenos que al ultimo se pongan un valor Nulo como 0 o "" según sea el caso

si se declaran en un modulo dichas variables serán globales almenos que se les defina lo contracion sean Publicas

public variable

o privadas

Private Variable

resulta y se aplica los mismo en un formulario clase o demás lugares,

Ojala te sirva lo expuesto.

Dulces Lunas.

mmm solo que deseas es agregardatos a un archivo y cerrarlo posteriormente seguir añadiendo datos ja bueno haber intenta con esto:

    Open Ruta For Binary As #1
        Seek (1), LOF(1) + 1
        Put #1, , Datos
    Close #1
 

Saludos.

mmm lo que haces es solo extraer el batch si es asi deberias usar la opción buscar d este foro por hay postee un codigo que ejecuta una serie de codigo Batch sin tener que generar el archivo X con dicho codigo, y las pipes de igual forma seguro.

mmm bueno pero en realidad no hay copilador alguno mmm en si solo que se hace es algo similar a esto, lo demás es chorrada y media:

stup + code Batch (este ultimo esta cifrado al final del executable) posterior mente el programa se abre a si mismo y lee esta parte es sencillo.

Ahora mi parte criticona:
     Me he bajado tu documento en PDF dicho documento solo miestra en su mayoria solo CODIGO sin documentar si es así sería mejor que se pusiera el source como tal.
     Un tutorial es EXPLICATIVO en cada instante
          Responde al Por que esto y por que aquello
          Por que esta linea por que esta otra

El tutorial devio haber sido Extremadamente desde inicio.
     Por que el Stup para que sirve que funcion se le puede agrar y demas
     Al igual por que no agregarle esto y aquello
     El cifrado deviste primeramente haberlo al final lo primero abjuntarle al Stup el codigo batch para que posteriormente al generar exe+batch lo abrieran lo demás con un editor hexadecimal o ya de perdida con el block de notas y vean donde se ha adjuntado dicho codigo (En palabras simples que vieran el Resultado final)

bueno en si esta bien solo te recomiendo que no Obligues a correr a los demás además de que un tutorial la mayor marte es teorico y las partes practicas son MUY sencillas y se van por partes Sin comlegidad

Ejemplo (solo pasos de u temario como lo haria un servidor):
     Estructura del exe con codigo a generar (Stup+Codigo Batch).
     Codigo Simplisimo de un stup.
     Codigo Simple del que unira el stup con el codigo batch.
     Como agregar mas funciones.
     Funciones Extras.

P.D.: Recuerda que para realizar un TUTO debes ponerte en los Zapatos de quienes lo leerán, no hice mis criticas a vace de ofensas solo para hacerte razonar y que mejores como Escritor/Redactor.

Nota.: Entendi bien esto pero al mostrarselo aun chico que sabe solo lo standar en VB6 (Sin APis y derivados) se quedo con la cara de What?

diria que no revivieras post viejos como siempre pero esta vez veo que este source la engine GDI esta Excelente casi como si usara la DirectX u OpenGL en el VB6

Si no lo revives no sabria de este.¡!

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

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)

o si Cita equivocada era para Cuenta Net