Con un poco de trabajo , usted puede escribir su propia versión de software notepad ordenador en el lenguaje de programación Visual Basic . Esto permitirá al usuario introducir , imprimir y guardar el texto como el Bloc de notas de programa de Microsoft hace. La aplicación puede ser tan básico como el descrito aquí o más compleja con características adicionales , la creación de software que es similar a un programa de procesamiento de textos . La aplicación utiliza los controles comunes y el diálogo ya están integrados en Visual Basic . Instrucciones
1
Crear un nuevo Visual Basic 6.0 ( VB6 ) del proyecto a través del " EXE estándar" de la plantilla. Haga clic en "Archivo " en el menú VB6 superior y seleccione " Guardar proyecto como. " El primer mensaje le pide un nombre de formulario . Nombre del formulario " MyNotepad " y haga clic en "OK . " El siguiente aviso le pedirá el nombre del proyecto. El nombre de " Mi Bloc de notas " y haga clic en " Aceptar".
2 Haga clic en "Proyecto" en el menú de VB6 superior y seleccione " Componentes ". Desplácese por la lista de componentes hasta que vea " Microsoft Common Dialog Control 6.0 ". Haga clic en la casilla de verificación junto a esta opción para agregar este control, y luego haga clic en" Aceptar ". Haga doble clic sobre este control , que debería ser el último elemento de la caja de herramientas a la izquierda, para agregar al formulario .
3
Busque el cuadro de propiedades a la derecha de la pantalla y haga doble clic en el primer elemento , " ( nombre) ". Cambiar el nombre por defecto a " MyNotepad . \\ " Haga doble clic en la propiedad "Subtítulo " y cambie el nombre a "Mi Cuaderno de apuntes . \\ "
4 Haga doble clic en el icono de cuadro de texto en el panel de herramientas de la izquierda de la pantalla para añadir esto a la forma . Haga clic en el nuevo control y el uso de las asas para agrandar el cuadro de texto de casi el tamaño de la propia forma arrastre. Ubique el control TextBox en el panel Propiedades de la derecha de la pantalla y hacer estos cambios :
( Nombre ) = MyNote
multilínea = True
ScrollBars = 3 - Ambos
5
clic en "Herramientas" en el menú superior VB6 y seleccione " Editor de menú ". Hacer estos cambios en el cuadro Editor de menú que se abre, haga clic en " Siguiente " después de cada una de la primera dos menús y " Salir " después de la última , como se muestra a continuación:
Caption = Imprimir
Name = mnuPrint
Haga clic en " Siguiente" < br /> Caption = Guardar
Name = mnuSave
Caption = Exit
Name = mnuExit
Haga clic en " OK" < br > Página 6
abrir la ventana , haga clic en "Ver" y luego " Código" en el menú de VB6 nivel superior . Escriba las siguientes líneas de código exactamente como aparecen a continuación:
Sub Form_Load () End Sub
Función SaveMyNote ( MyNote As Control , CommonDialog1 Como CommonDialog , Nombre As String ) As Boolean
FNUM As Integer
On Error GoTo ExitNow
CommonDialog1.Filter = \\ " Archivos de texto