Cómo editar Libreta Con VB6

Notepad es un editor de texto disponible con el sistema operativo Windows. Documentos editados o creados en el Bloc de notas se pueden guardar con Unicode , ANSI , UTF - 8 o Unicode big- endian. Otros ejemplos de codificación son el código Morse y ASCII . El tipo de codificación seleccionada determina cómo el texto será interpretada por el ordenador . Archivos de texto básicos guardados con la extensión " . Txt" suelen ser Unicode. Bloc de notas también se puede utilizar para la creación de páginas web por salvar el texto como " . Html" o " . Xml . " Instrucciones
1

Abra un nuevo proyecto EXE estándar en Visual Basic 6 . Seleccione "proyectar", "Componentes " del menú y haga clic en la casilla de verificación al lado de " 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 derivador para acceder a la clase. NET " FileStream " . El contenedor debe tener una línea que se parece a esto: " Volver Nueva Corriente ( StreamParameters ) . "
2

Seleccione los ricos control Cuadro de texto de la barra de herramientas y haga clic en el formulario para agregar un nuevo texto enriquecido Control con el nombre " RichTextBox1 " por defecto. Cambiar el nombre a algo significativo , como " rtbNotePad . "
3

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

Abra el archivo de Bloc de notas y mostrar el contenido en el cuadro de texto enriquecido " iFileNum = FreeFile . "

SMyFile abierto para entrada como iFileNum

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

Agregar un botón a la forma y el nombre de " cmdSave " y establezca su título a " Guardar". Agregar, eliminar o editar el contenido de " rtbNotePad " y haga clic en el botón "Guardar " cuando haya terminado. Para guardar el contenido de la caja de control de texto enriquecido , el código de esta línea "Write iFileNum , rtbNotepad.text . "