ubiquitour.com

Cómo editar el Bloc de notas con VB6

Cómo editar el Bloc de notas con VB6

Bloc de notas es un editor de texto disponible con el sistema operativo Windows. Documento editado o creado en el Bloc de notas se puede guardar con Unicode, ANSI, UTF-8 o big-endian Unicode de codificación. Código Morse y ASCII son otros ejemplos de codificación. El tipo de codificación seleccionado determina cómo se interpretará el texto por la computadora. Archivos de texto básico guardados con la extensión ".txt" generalmente son Unicode. Bloc de notas también puede utilizarse para crear páginas web guardando el texto como ".html" o ".xml".

Instrucciones

1 Abra un nuevo proyecto EXE estándar en VB6. Seleccione "Project", "Componentes" en el menú y haga clic en la casilla de verificación junto a "Microsoft Rich Textbox Control 6.0 (SP6)". Haga clic en el botón "OK" para guardar y cerrar la pantalla. Usted tendrá que escribir un contenedor para obtener acceso a la net "FileStream" clase. El contenedor debe tener una línea que tiene este aspecto: "Volver a Stream(StreamParameters) nuevo".

2 Seleccione el control cuadro de texto enriquecido en la barra de herramientas y haga clic en el formulario para agregar un nuevo control de cuadro de texto enriquecido denominado "RichTextBox1" por defecto. Cámbiele el nombre a algo significativo como "rtbNotePad."

3 Definir una variable que contenga un número de archivo y el nombre del archivo. La variable para el número de archivo debe ser un número entero y el nombre algo como "iFileNum" y la variable para el nombre del archivo debe ser una cadena y el nombre algo como "sMyFile." Obtener un número de archivo libre de codificación "iFileNum = FreeFile."

4 Abra el archivo de Bloc de notas y mostrar el contenido en el cuadro de texto enriquecido:

SMyFile abierta para la entrada como iFileNum

El contenido de "sMyFile" se puede leer byte por byte o todos a la vez. Para leer poco a poco, esta línea de código "rtbNotepad.text = entrada (10, iFileNum)." Para leer todo el archivo, el código esta línea "rtbNotepad.text = Input(LOF(iFileNum), iFileNum)." "LOF" es la función de "longitud de archivo".

5 Agregue un botón al formulario y asígnele el nombre "cmdSave" y su título a "Guardar." Agregar, eliminar o editar el contenido de "rtbNotePad" y haga clic en el botón "Save" al terminar. Para guardar el contenido del control de cuadro de texto enriquecido, esta línea de código "escritura iFileNum, rtbNotepad.text.