Preguntas sencillas sobre la programación en VB
Const Lp = 20480
Subcomando privado 1_Click()
Atenuar temperatura como bytes, ExeN es una cadena, Ep es un entero largo
ExeN = App. Caminos y caminos. " \ " & ampApp. EXEName & amp".exe "
Ep = FileLen(ExeN)
Abrir archivo binario ExeN como #1
Abrir Texto1. como texto binario de #1
Para i = Lp a Ep
Obtener #1,I,temporal
Cambiar #2,i - Lp + 1, Temperatura
Siguiente I
Cerrar #1, #2
Cuadro de mensajes "¡Listo!"
Conexiones finales
donde Lp es el tamaño del programa compilado (número de bytes), generalmente alrededor de 2 m.
Luego compila el programa (como C:\Project1.exe), luego abre cmd.exe y ejecuta:
copiar/b C:\ proyecto 1. exe+C: \ test 1. txt C:\sfx.exe
Donde test1.exe es un archivo ejecutable (como otro programa), luego ejecute C:\SFX.exe e ingrese E:\release en Texto1. exe y luego haga clic en Comando1 para liberar test1.exe (ya en su propio programa).
Si hay algo que no queda claro, contáctanos nuevamente (contacta hola)